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Vorwort 


Meine erste formelle Einweisung in die Arbeit mit einem Computer 
erhielt ich 1966. Damals erzählte unser erfahrener Lehrer, wir 
hätten ausgesorgt, wenn wir den untersten Level in der Handhabung 
eines Computers erreicht hätten. Als Ergebnis dieser Philosophie 
konnten wir binär zählen und Werte oktal und dann dezimal konver- 
tieren. Wir schrieben Codes für die Computer, wobei wir nur "0" 
und "1" benutzten. Wir lernten aber auch, Programme in einer hö- 
heren Programmiersprache, FORTRAN, zu schreiben. Verglichen mit 
dem Binär- oder Oktalcode war FORTRAN leicht. Das Problem war, 
daß wir nie an einem Bildschirm arbeiten konnten, und obwohl wir 
ein sehr gutes theoretisches Verständnis der Abläufe im Computer 
hatten, lernten wir nicht sehr viel über die Zusammenarbeit mit 
dem Computer. Wir benutzten Lochkarten, sandten unsere Programme 
über Telefonleitungen in einen Computer in der Universität und 
warteten dann eine Woche, um die Ergebnisse zu erhalten. War im 
Programm ein Fehler, mußten wir das gesamte Programm für einen 
weiteren Versuch nochmals übersenden. 


Seit dieser Zeit haben sich die Computer wie auch die Benutzer 
gewandelt. Um den Umgang mit einem Computer zu erlernen, ist es 
nicht mehr notwendig zu wissen, wie dieser intern arbeitet, oder 
die Theorie zu erlernen, die hinter den Operationen steht. Es ist 
richtig, daß man mehr mit dem Computer machen kann, wenn man ein 
detailliertes Verständnis der Theorie und der Operationen eines 
Computers hat. Dies ist jedoch nicht mehr erforderlich. Man kann 
programmieren lernen und sich erst zu einem späteren Zeitpunkt 
mehr technische Einzelheiten über die Arbeitsweise des Computers 
aneignen. Die meisten Leute lernen ja auch das Autofahren, ohne 
Kenntnisse über die kompliziertenn Abläufe im Verbrennungsmotor 
ihres Autos zu besitzen. 


Eine weitere große Veränderung trat durch den Übergang von Groß- 
computern mit Bildschirmen zu kleinen Schreibtischcomputern ein. 
Sie sind vollwertige Computer. Deshalb sind wir nicht mehr auf 
einen Großcomputer angewiesen und können alles selbst erledigen. 
Daraus ergibt sich, daß Sie sich nicht mehr an einen vorgegebenen 
Dienstplan und an Bestimmungen halten müssen, um Rechenzeit zu 
erhalten oder für "Computerzeit" zu bezahlen haben. Sie erstellen 
Ihren eigenen Plan und sind Ihr eigener Chef. Aus diesem Grund 
ist es nicht notwendig, lange über die organisatorischen Aspekte 
der Hauptspeicherzeitvergabe zu diskutieren oder über alle weite- 


ren Probleme, die auftreten, wenn mehrere Personen "gleichzeitig" 
den Computer benutzen. Wir wollen somit gleich zum Kern der Sache 
kommen, nämlich, wie Sie Ihren Computer programmieren können. 


Der Zweck dieses Buches liegt hauptsächlich darin, Sie im Umgang 
mit Ihrem Computer und in der Programmiersprache BASIC zu unter- 
weisen. Es vermittelt ein Grundwissen. Erwarten Sie deshalb bei 
der Arbeit mit dem Buch nicht, alles über Ihren Commodore-64 zu 
lernen. Wenn Sie mit diesem Buch zu Ende sind, werden Sie erst 
sehen, wieviel mehr Sie mit Ihrem Computer anfangen können. Je 
mehr Sie lernen, desto größer wird das noch zu erforschende Ge- 
biet. Wenn Sie jedoch die folgenden Anweisungen nachvollziehen 
und die kleinen Beispiele eintippen, werden Sie schnell lernen, 
wie Sie mit den BASIC-Befehlen Ihres Commodore-64 Programme 
schreiben können. 


Erwarten Sie aber auch nicht, alles auf einmal zu lernen. Seien 
Sie mit sich und Ihrem Computer nachsichtig, und Sie werden über- 
rrascht sein, wieviel Sie lernen. Wenn Sie ein Kommando oder ei- 
nen Vorgang nicht sofort verstehen, können Sie jederzeit später 
wieder darauf zurückkommen. Experimentieren und spielen Sie mit 
Ihren Programmen. Denken Sie sich verschiedene Anwendungen für 
Ihren Computer aus, und versuchen Sie dann ein Programm dafür zu 
schreiben. Haben Sie vor allem keine Angst, einen Versuch zu 
starten. Mit jedem Versuch und jeder weiteren Zeile werden Sie 
Fortschritte machen. Auch falls es mal langsam vorangeht, wird 
das angesammelte Wissen zum Verständnis führen. 


10 


Einführung 


Dieses Buch wurde als Hilfe zur Handhabung Ihres neuen COMMODORE- 
64 und als Anleitung zum Programmieren geschrieben. Es ist nicht 
für fortgeschrittene Programmierer oder erweiterte Anwendungen 
gedacht. Es ist sozusagen der erste Schritt für Anfänger auf dem 
COMMODORE-64 Computer. Das gesamte Buch ist in Form von Anleitun- 
gen geschrieben; wenn Sie es durchgearbeitet haben, werden Sie in 
der Lage sein, Programme zu schreiben und zu benutzen. 
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Für eine systematische Einarbeitung in dieses Buch ist es empfeh- 
lenswert, ganz zu Beginn zu starten und es Schritt für Schritt 
durchzuarbeiten. Ich habe versucht, die Kapitel logisch aufeinan- 
der aufzubauen. Aus dem Versuch, Sprünge zu machen, kann resul- 
tieren, daß Sie einige wichtige Computeroperationen nicht verste- 
hen. Die einzige Ausnahme von dieser Regel ist das letzte Kapi- 
tel, in dem sich eine Anzahl von Vorschlägen für Programme befin- 
den, die Ihnen beim Programmieren helfen sollen (sog. Dienstpro- 
gramme). Ebenso befinden sich dort Programmbeschreibungen für 
Geschäftsprogramme, Textverarbeitung usw. Wenn Sie dieses Kapi- 
tel durchgearbeitet haben, wäre es gut, wenn Sie einen Blick auf 
jene aufgeführten Programme werfen, um während des Arbeitens mit 
diesem Buch schon zu wissen, ob eines davon Ihren Bedürfnissen 
entspricht. Sie brauchen keines davon zu kaufen. Sie werden je- 
doch einige davon sehr nützlich finden. 


Das erste, was Sie über Ihren Computer wissen sollten, ist, daß 
er Sie nicht "beißt", jedoch einer gewissen Sorgfalt bedarf. Sie 
können Disketten, Bänder und Informationen zerstören. Wenn Sie 
aber einige einfache Regeln einhalten, sind Sie auf dem richtigen 
Weg. Jeder von uns benutzt täglich hochentwickelte elektronische 
Geräte, wie Stereoanlage, Fernseher oder Videorecorder - und 
auch dort ist eine gewisse Sorgfalt erforderlich. Ansonsten 
brauchen Sie sich nicht zu fürchten. Da Ihr Computer ebenfalls 
ein elektronisches Gerät ist, werden Sie ihn zerstören, wenn Sie 
Wasser oder andere Flüssigkeiten über ihn gießen. Seien Sie sehr 
vorsichtig, aber auch unternehmenslustig und beginnen Sie. Erin- 
nern Sie sich, daß es praktisch unmöglich ist, ein Programm zu 
schreiben, das Ihr Gerät oder die elektronischen Schaltkreise in 
der Maschine zerstört. Schlimmstenfalls kann eines der von Ihnen 
erstellten Programme die Informationen auf der Diskette oder auf 
dem Band löschen. Überall in diesem Buch gebe ich Tips, wie man 
die Dinge richtig und falsch macht. Behandeln Sie also Ihren 
Computer genau wie Ihren Microwellenherd, Ihr Radio oder ein an- 
deres elektronisches Gerät - mit Vorsicht, aber ohne Angst. 


Im Augenblick ist es noch nicht nötig, alle Begriffe aus dem Com- 
puter-Jargon zu lernen; aber einige Ausdrücke sind für ein bes- 
seres Verständnis der Arbeitsweise des Computers erforderlich. 
Später werden weitere neue Ausdrücke erläutert, doch qgrundsätz- 
lich ist das Buch in gut verständlichem Deutsch verfaßt. Nichts- 
destoweniger sollten Sie vor dem eigentlichen Start folgende 
Begriffe kennen. 
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Der Begriff Hardware gilt für Ihre Maschine und alle elektroni- 
schen Teile. Alles, angefangen bei der Tastatur über die Schalt- 
kreise zu den kleinen schwarzen Chips in Ihrem Computer, wird 
"Hardware" genannt. Sie werden auch den Ausdruck "Firmware" 
hören. Dies ist ein anderer Typ der Hardware, auf dem Programme 
geschrieben werden. Die Chips, genannt "Prom" oder "Eprom", spei- 
chern Informationen genau wie Diskettten oder Bänder. Firmware 
ist entweder in Ihrem Computer, in einem Extragehäuse oder auf 
Karten, die von hinten in Ihren COMMODORE-64 gesteckt werden. Ein 
biologischer Vergleich zu diesem Thema: Der Körper, vor allem das 
Gehirn, ist die Hardware und Firmware ist wie angeborene oder 
erworbene Intelligenz. 


Software 


Software ist das Programm, das Ihrem Computer mitteilt, wie er zu 
arbeiten hat. Alle Informationen, die vom Speicher des Computers 
aufgenommen werden, bedeuten "Software". Sie steht analog zu 
Ihren Gedanken oder Ideen. Sehen Sie die Hardware als Gehirn des 
Computers an und die Software als die einzuspeichernden Ideen. 
Software ist für den Computer das gleiche wie Schallplatten für 
Ihren Plattenspieler. Software wird entweder im "Random Access 
Memory" (ein Speicher, den man sowohl lesen als auch beschreiben 
kann, Abk: RAM) oder im "Read Only Memory" (Speicher, die man nur 
lesen kann, Abk: ROM) gespeichert. Firmware ist Hardware mit 
"eingebrannter" Software. 


RAM - Sie hören vielleicht von Leuten, die Ihr RAM erweitert 
haben. Dies ist jener Teil des Computerspeichers, in den Sie In- 
formationen in Form von Daten oder Programmen eingeben können. Je 
größer der Speicher ist, desto längere Programme und größere Da- 
tenmengen können Sie eingeben. Denken Sie bei RAM an ein Lager- 
haus. Wenn Sie das erste Mal Ihren Computer einschalten, ist das 
Lagerhaus noch leer (eine Meldung sagt: 38911 BASIC BYTES FREE - 
38911 Bytes freier Speicher); aber wenn Sie Programme laufen las- 
sen und Informationen eingeben, beginnt sich das Lager zu füllen. 
Je größer es ist, desto mehr Informationen können Sie darin 
speichern; wenn es voll ist, müssen Sie aufhören. COMMODORE-64 
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Computer haben 64K RAM. das "K" steht für "Kilobytes" oder "tau- 
send Bytes", genau gesagt: 1024 Bytes. Die neuen Plattenspeicher- 
systeme werden in "Megabytes" oder "1 Million Bytes", genau: 
1.024.000 Bytes, gemessen. Erwähnen Sie dies bei Ihrer nächsten 
Party, und Sie werden jeden beeindrucken. Sie müssen nur wissen, 
daß Bytes eine Maßeinheit darstellen, ähnlich wie Liter, Meter 
oder Zentimeter. Je mehr Bytes ein Computer besitzt, desto mehr 
Platz für Programme ist vorhanden. 








Keine Angst 
ich beiße nicht! 
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ROM - Der zweite Typ von Computerspeichern ist der "Read Only 
Memory". Dieser Speichertyp ist ein fester Bestandteil des Com- 
puterchips. Die Programmiersprache des COMMODORE-64, BASIC, ist 
im ROM gespeichert. Den Unterschied zwischen RAM und ROM sehen 
Sie, wenn Sie den Computer ausschalten. Die Informationen im RAM 
verschwinden, während die im ROM erhalten bleiben. Lassen Sie 
sich aber nicht irritieren. Sie können alles, was sich im RAM 
befindet, auf Diskette oder Band speichern und sich dann wieder 
holen. Wie dies geschieht, werde ich später noch erklären. 


Jetzt sind Sie mit einigen Begriffen genügend vertraut, um Ihren 
Computer nicht zu fürchten. Schalten Sie ihn ein und lassen Sie 
ihn arbeiten. Haben Sie Ihren Computer bereits aufgestellt und er 
arbeitet richtig, können Sie direkt zum nächsten Abschnitt "Be- 
triebsfertig" springen. 


1.1 Aufstellen des COMMODORE-64 und der peripheren Geräte 


Nach Durcharbeiten dieses Abschnittes sollten Sie den COMMODORE- 
64 anschließen und einschalten. Vorher müssen wir aber noch 
einige Vorbereitungen treffen. Wenn Sie Ihrem Computer ohne Dis- 
kettenstation oder einen Datenrecorder gekauft haben, können Sie 
damit zwar arbeiten, aber Sie brauchen eine Commodore-Kassetten- 
einheit oder ein Diskettenlaufwerk, um Ihre eingegebenen Informa- 
tionen abzuspeichern. Wenn Sie diese zusätzlichen Geräte nicht 
besitzen, können Sie direkt zum Abschnitt "Betriebsfertig" über- 
gehen. 


Datenrecorder 


Wenn Sie einen Datenrecorder benutzen (mit oder ohne Diskettenbe- 
triebssystem) , ist es sehr einfach, ihn aufzustellen. An Ihrer 
Commodore-C2N-Kassetteneinheit befindet sich ein Kabel für die 
Verbindung mit dem Computer. Nehmen Sie das Kabel und stecken Sie 
es in den schmalen Anschluß, der sich hinten links an Ihrem Com- 
puter befindet (direkt hinter den Tasten "4","5" und "6"). Verge- 
wissern Sie sich, daß das Kabel korrekt mit den Stiften des An- 
schlußes verbunden ist, stellen Sie aber auf keinen Fall die Ver- 
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bindung mit Gewalt her. Das ist alles. Ihr Kassettenrecorder ist 
nun betriebsbereit. Benutzen Sie normale Kassetten - gewöhnlich 
sind die 5-Minuten-Bänder die besten. 


Diskettenlaufwerk 


Zu Ihrem COMMODORE-64 sollten Sie das VIC-1541 Diskettenlaufwerk 
benutzen. (Das VIC-1540 wird nur dann korrekt mit Ihrem COMMODO- 
RE-64 arbeiten, wenn Sie ein zusätzliches Spezialchip einbauen.) 
Um Ihr Diskettenlaufwerk anzuschließen, befestigen Sie das eine 
Ende des Diskettenkabels am seriellen Anschluß hinten an Ihrem 
Computer (direkt rechts vom Kassettenanschluß, hinter den Tasten 
"7" und "8") und das andere Ende in der Fassung an der Rückseite 
Ihres Diskettenlaufwerks, direkt über der "Sicherung". Jetzt 
stecken Sie das Stromkabel Ihres Diskettenlaufwerks in die drei- 
zackige Fassung zwischen dem "Ein/Aus"-Schalter und der Siche- 
rung. Wenn alles andere verbunden ist, können Sie das Stromkabel 
des Laufwerks in die Steckdose führen und den Schalter auf "ON" 
drücken. Tun Sie dies aber jetzt noch nicht. 
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Fernseher oder Monitor 


Damit Sie auch sehen, was in Ihrem Computer vorgeht, brauchen Sie 
einen Monitor. Für manche Computer ist es notwendig, einen RF- 
Modulator zu erwerben. Ihr COMMODORE-64 wird jedoch schon mit 
eingebautem RF-Modulator geliefert. Stecken Sie nun das eine Ende 
des Commodore-64-Verbindungskabels in die TV-Buchse an der Rück- 
seite Ihres Computers, direkt hinter der "+"-Taste, und das an- 
dere Ende in die "Buchse" Ihres Fernsehers. Diese Buchse gehört 
zur Antennenverbindung und ist duch "VHF" auf der Rückseite Ihres 
Fernsehgerätes markiert. 


Eine andere Möglichkeit ist ein Monitor anstelle des Fernsehers. 
Grundsätzlich erfüllt der Monitor den gleichen Zweck wie das 
Fernsehgerät; er hat jedoch eine höhere Auflösung und ist sehr 
nützlich, wenn Sie viel mit Textverarbeitung zu tun haben. Um ei- 
ne Verbindung zum Monitor zu schaffen, brauchen Sie ein spe- 
zielles Kabel, das direkt neben dem seriellen Ausgang eingesteckt 
wird. Das fünfpolige Audiokabel, das Sie in Elektronikgeschäften 
erhalten, ist ein guter Kauf, da Sie es auch für Ihre Stereoan- 
lage benutzen können. 


Im folgenden beschreibe ich einige Monitore und Fernsehgeräte, 
die Sie für Ihren COMMODORE-64 benutzen können. 


Verschiedene Fernsehgeräte 


Fernsehgeräte gibt es in vielen Ausführungen und Größen, in Farbe 
oder Schwarzweiß. Seien Sie vorsichtig bei der Auswahl des Gerä- 
tes. Nicht jeder Fernseher arbeitet gut in Verbindung mit Ihrem 
COMMODORE-64. Als ich meinen Fernseher kaufte - ein Farbgerät 
wegen der Grafik - schaute ich mich zuerst einmal in Computer- 
läden um, welche Geräte dort benutzt werden. Am günstigsten ist 
ein einfaches Schwarzweißgerät. Es hat eine bessere Auflösung als 
ein Farbgerät, ist nicht so teuer und eignet sich gut für Text- 
verarbeitung. Das beste dabei ist, daß Sie es schon für weniger 
als 200 DM bekommen. Wie auch immer, vergewissern Sie sich 
zuerst, ob das Gerät zusammen mit Ihrem COMMODORE-64 funktio- 
niert. 
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Verschiedene Monitore 


Grüner Bildschirms - Dieses Gerät produziert grüne Schrift auf 
schwarzem Grund und kostet zwischen 200 und 500 DM. Die Grün-auf- 
Schwarz-Darstellung ist gut für Textverarbeitung und Programme 
ohne Grafikdarstellung und sehr angenehm für die Augen. Da auf 
dem Gerät nur die Farben Grün und Schwarz verwendet werden, ist 
es nicht für farbige Grafik geeignet. 


Schwarzweiß - Dieser Bildschirm ist im wesentlichen dem grünen 
Bildschirm gleichzusetzen. Er ist teurer als ein Schwarzweißfern- 
seher. Da er aber eine bessere Auflösung hat, ist der kleine Auf- 
preis gerechtfertigt. Wenn Sie überlegen, ob Sie einen Schwarz- 
weiß-Monitor kaufen sollen, vergleichen Sie seine Auflösung mit 
der eines Schwarzweißfernsehers und prüfen Sie, ob sich die Ex- 
traausgabe nicht doch lohnt. 


Farbe - Dieser Monitortyp ist der teuerste, aber für Personen, 
die sehr viel mit Farbgrafik arbeiten, unumgänglich. Er enthält 
die erforderliche Hochauflösung, um die Grafiken im Detail zu 
sehen. Manche Farbmonitore erfordern aber eine spezielle Schnitt- 
stelle. Prüfen Sie vor dem Kauf des Bildschirms, ob Sie für Ihren 
COMMODORE-64 eine Schnittstelle bekommen. 


Drucker 


Dieser Abschnitt informiert Sie über die verschiedenen Arten von 
Druckern und deren Aufstellung. Wenn Ihr Drucker bereits aufge- 
stellt ist und richtig arbeitet, schauen Sie sich die Tips für 
den optimalen Gebrauch Ihres Druckers in Kapitel 9 an. 


Druckertypen 
Es gibt drei verschiedene Druckertypen. 
MATRIXDRUCKER - Er ist der bekannteste Drucker auf dem Markt. 


Dieser Drucker hat eine Reihe von kleinen Nadeln, die heraus- 
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schießen, einen Punkt darstellen und so Text oder Grafik ausge- 
ben. Der Vorteil der Matrixdrucker liegt in den niedrigen Kosten 
und der Tatsache, daß sie Text und Grafik ausgeben können. Ma- 
trixdrucker erreichen in der Betriebsart "Schönschreiben" fast 
Korrespondenzqualität und bieten gewöhnlich mehrere Schriftarten. 
In Kapitel 9 zeigen wir Beispiele von unterschiedlichen Druckar- 
ten der Matrixdrucker. Wir benutzen für die meisten Beispiele den 
VIC-1515-Drucker von Commodore, da dieser kompatibel mit dem COM- 
MODORE-64 ist. (Parallele Schnittstellen für Matrixdrucker sind 
lieferbar. Siehe Korrespondenzqualität.) 


KORRESPONDENZQUALITÄT - Für Anwender, die ihren Computer haupt- 
sächlich für Textverarbeitung benutzen, sind Drucker mit Korres- 
pondenzqualität gut geeignet. Die meisten sind Schönschreibdruk- 
ker mit Typenrad und arbeiten genau wie eine Schreibmaschine. 
Diese Drucker sind nicht für Grafikausgaben geeignet, jedoch für 
die Anwender am besten, die Wert auf ein perfektes Schriftbild 
für Manuskripte oder Dokumente legen. Sie sind aber relativ teu- 
er. Zudem genügt für die meisten Anwendungen ein Matrixdrucker. 
Bevor Sie sich entscheiden, sollten Sie erst einmal vergleichen. 
Da Sie zum Anschluß eines Schönschreibdruckers an Ihren COMMODO- 
RE-64 eine spezielle Schnittstelle benötigen, lassen Sie sich den 
Drucker, angeschlossen mit dieser Schnittstelle, vor dem Kauf 
vorführen. Da der COMMODORE-64 einen seriellen Ausgang (anstatt 
eines parallelen Ausgangs) hat, werden Sie wahrscheinlich einen 
Drucker bekommen, der seriell kompatibel ist. 


THERMODRUCKER - Wenn Sie nicht so viel Geld ausgeben möchten, ist 
vielleicht der Thermodrucker der richtige für Sie. Dieser Drucker 
arbeitet mit Spezialpapier, gewöhnlich Endlospapier und fertigt 
ein "Bild" Ihres Monitors an. Er kann sowohl Text als auch Grafik 
ausgeben. Die Qualität der Ausgabe ist jedoch relativ gering und 
das Spezialpapier sehr teuer. Der Vorteil liegt im leichten Ge- 
wicht und den kleinen Abmessungen. Diese Drucker sind daher sehr 
geeignet für Leute, die mit dem Computer verreisen und schnell 
mal eine Kopie brauchen. Achten Sie, genau wie beim Matrix- und 
Schönschreibdrucker, vor dem Kauf darauf, daß die Schnittstelle 
zu Ihrem COMMODORE-64 paßt. 
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Ein Ratschlag 


Überlegen Sie vor dem Kauf eines Drucker den Verwendungs- 
zweck und die Besonderheiten der verschiedenen Druckerar- 
ten! Lassen Sie sich nicht von einem Verkäufer überzeugen, 
daß ein bestimmter Drucker an den COMMODORE-64 anzuschlie- 
ßen ist, wenn Sie es nicht gesehen haben. Selbst ein Ver- 
käufer mit den besten Absichten (er glaubt z.B., daß jener 
Drucker für Ihre Bedürfnisse der beste sei) weiß vielleicht 
nicht, daß der Drucker an Ihren Computer nicht anschließbar 
ist. Nur eine Demonstration kann alle Zweifel beseitigen! 





Wenn Sie einen VIC-1515 oder einen ähnlichen Commodore-Drucker 
kaufen, ist es sehr einfach, ihn anzuschließen. Haben Sie ein 
Diskettenlaufwerk, stecken Sie das eine Ende des Kabels in den 
freien Anschluß an der Rückseite des Diskettenlaufwerks und das 
andere in den Drucker. Dies nennt man "Zwischenschleifen" des 
Druckers. Wenn Sie einen Datenrecorder haben, stecken Sie das 
Kabel neben dem Kassettenanschluß an der Rückseite des Computers 
ein. Es ist der gleiche Anschluß, win den Sie das Diskettenlauf- 
werk stecken würden. An der Rückseite des Druckers befindet sich 
ein Schalter, den man auf "T", "4" oder "5" stellen kann. Stellen 
Sie ihn auf "4". (Die "T"-Position ist für "Test" und die Posi- 
tion "5" für die Identifizierung des Gerätes als "Gerät 5". Wir 
benutzen in unseren Beispielen den Drucker als "Gerät 4", stellen 
Sie ihn deshalb bitte auch so ein.) 


Warnung 


Stecken oder entfernen Sie NIEMALS ein Kabel in die/aus der 
Schnittstelle während das Gerät EINGESCHALTET ist! Auch 


wenn Sie genug Geld übrig haben, sich jedesmal ein neues 
Chip zu kaufen (da Sie Ihr ursprüngliches bei solch einer 
Behandlung zerstören könnten), wäre das doch sehr ärger- 
lich. 
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Weitere Geräte 


Benutzer, die außer ihrem Diskettenlaufwerks, dem Fernseher oder 
Monitor und dem Drucker im Moment nichts anschließen, können di- 
rekt zum nächsten Abschnitt übergehen. Falls Sie planen, Ihren 
COMMODORE-64 zu erweitern oder weitere Geräte anzuschließen, 
sollten Sie zuerst folgende Absätze lesen. 


Mehrere Ausgänge 


Die besten Eigenschaften des Commodore-64 sind seine Ausbau- und 
Anpassungsfähigkeit. Die verschiedenen Ausgänge und Anschlüsse an 
Ihrem Computer können Sie dazu benutzen, um verschiedene Geräte 
anzuhängen und somit Ihr System zu erweitern. 


MODEM - Ein Modem ist ein Gerät, das ihrem Computer die Möglich- 
keit gibt, mit anderen Computern über die Telefonleitung zu kom- 
munizieren. Diese Geräte erfordern, daß Sie Ihr Telefon mit einem 
Teil des Modems verbinden oder den Hörer in einen Akkustikkoppler 
legen. Das VICMODEM kann mit dem COMMODORE-64 zusammen benutzt 
werden, indem Sie es einfach in den "User Port", rechts neben dem 
Kasettenausgang stecken und es mit der Telefonleitung verbinden. 
In Amerika können Sie sich mit dem Modem auch in bestehende In- 
formationszentren (Source) einwählen, um alles, angefangen vom 
Wetterbericht bis hin zum Flugticket, zu erhalten. Bevor Sie bei 
uns ein Modem anschließen, erkundigen Sie sich bei der Post, ob 
dieses auch zugelassen ist. 


2-80 CP/M - Dieses Bauteil wird direkt in den Gehäuseanschluß 
eingesteckt, um Ihre Maschine in einen Z-80-Computer zu verwan- 
deln. Es ermöglicht Ihnen, die umfassenden CP/M-Programme laufen 
zu lassen. Unter den 2000 CP/M-Programmen auf dem Markt sind nur 
wenige, die dann nicht laufen. 


NOCH MEHR ERWEITERUNGEN - Es gibt noch eine Reihe zusätzlicher 
Erweiterungen um Ihren COMMODORE-64 zu einer vielseitigen Maschi- 
ne zu machen. Spezielle Schnittstellen erlauben Ihnen den An- 
schluß einer Vielzahl von peripheren Geräten, wie z.B. verschie- 
denen Diskettenlaufwerken, Druckern und weiteren Geräten für 
andere Computer. Nun ist der COMMODORE-64 an sich schon ein her- 
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vorragender Computer, aber er ist auch voll ausbaufähig und wird 
dadurch noch besser. 


1.2 Betriebsfertig 


System-Check 


Nachdem Sie alle benötigten Geräte an Ihren COMMODORE-64 ange- 
steckt haben, schalten Sie ihn, zusammen mit Ihrem Fernseher oder 
Monitor, Diskettenlaufwerk und Drucker, ein. Der Schalter befin- 
det sich rechts, direkt neben dem Stromkabelanschluß. Bringen Sie 
ihn in die ON-Position und schalten Sie Ihren Fernseher oder 
Monitor ein. Wenn alles angeschlossen ist, bekommen Sie auf dem 
Bildschirm folgende Meldung: 


**%*%* COMMODORE 64 BASIC V2 *** 
64K RAM SYSTEM 38911 BASIC BYTES FREE 
READY. 


Wenn Sie einen Farbfernseher haben, erscheinen die Buchstaben 
hellblau auf dunkelblauem Grund mit hellblauer Umrandung. Direkt 
unter der READY-Meldung befindet sich ein kleines blinkendes 
Quadrat. Es ist der sogenannte Cursor, der anzeigt, daß der Com- 
puter auf eine Eingabe wartet, was er zu tun hat. Drücken Sie 
mehrmals die RETURN-Taste, werden Sie sehen, daß der Cursor auf 
dem Bildschirm nach unten wandert. Die erste Nachricht wird oben 
aus dem Bildschirm rollen. Der Cursor befindet sich nun auf Ihrem 
Schirm links unten. Um ihn nach links oben zu schicken, drücken 
Sie die Taste CLR/HOME in der rechten oberen Ecke Ihrer Tastatur. 
Der Cursor springt sofort in die linke obere Ecke des Monitors. 
Wenn Sie dies probiert haben, sehen Sie ,„ daß Ihr Computer und 
die Tastatur eine Einheit bilden. Wir werden gleich zur Tastatur 
zurückkehren. Lassen Sie uns aber zuerst Ihren Drucker, Ihr Dis- 
kettenlaufwerk und/oder Ihren Kassettenrecorder testen. 


Um zu sehen, ob Ihr Drucker korrekt arbeitet, geben Sie folgendes 
Programm GENAU SO EIN: 
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Schreiben Sie zuerst das Wort NEW und drücken Sie RETURN. (mit 
<RETURN> ist die so markierte Taste gemeint.) 


10 OPEN? ‚4A<RETURN> 
20 PRINT#7,"MEIN DRUCKER ARBEITET! "<RETURN> 
30 CLOSE7<RETURN> 


Vergewissern Sie sich, daß Sie das Programm genauso geschrieben 
haben, wie es hier oben steht. Wenn auch nur geringfügige Unter- 
schiede bestehen, verbessern Sie diese so, daß die Texte präzise 
übereinstimmen. Geben Sie das Farbband und Papier in den Drucker. 
Schalten Sie den Drucker jetzt ein, geben Sie das Wort RUN und 
dann <RETURN> auf Ihrem Computer ein. Wenn Ihr Drucker richtig 
angeschlossen ist, wird er die Meldung "MEIN DRUCKER ARBEITET!" 
ausgeben. Wenn "SYNTAX ERROR" oder eine andere Meldung auf Ihrem 
Monitor erscheint, heißt das, daß das kleine Testprogramm falsch 
eingegeben wurde und Sie es nochmal neu versuchen müssen. Wenn 
Ihr System "aussteigt", - der Bildschirm wird dunkel, und es pas- 
siert nichts mehr - sehen Sie nach, ob der Drucker eingeschaltet 
ist und der Schalter auf der Rückseite auf "4" steht. Wenn er 
jetzt immer noch nicht funktioniert, schalten Sie den Drucker und 
den Computer aus und wiederholen die Schritte AUFSTELLEN DES 
COMMODORE-64 UND DER PERIPHEREN GERÄTE. 
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Laden des Betriebssystems von der Diskette 


Vorausgesetzt, Ihr System arbeitet richtig, können Sie jetzt eine 
Diskette in Ihrem Diskettenlaufwerk VIC-1541 "laden". (Wenn Sie 
ein anderes Diskettenlaufwerk haben, lesen Sie diese Schritte im 
mitgelieferten Manual nach.) Ihr Betriebssystem (DOS) wird fol- 
gendermaßen in den Computer gebracht: Schalten Sie Ihr Disketten- 
laufwerk ein, indem Sie den Schalter hinten am Laufwerk auf ON 
stellen. Zuerst leuchtet das rote Licht auf und Sie hören einige 
Geräusche, bevor es erlischt und das grüne Licht erscheint. Legen 
Sie nun eine LEERE SOFT-SEKTORIERTE Diskette (nicht die mitgelie- 
ferte TEST-DEMO) mit dem kleinen Einschnitt links und der be- 
schrifteten Seite nach oben in das Laufwerk. Drücken Sie die 
Klappe nach unten und leicht nach vorn, bis Sie ein Klicken hö- 
ren. Jetzt können Sie die Diskette formatieren. 


(HINWEIS: Wenn Sie eine Diskette schon formatiert haben, sollten 
Sie dies NICHT nochmals machen, außer Sie möchten alle Programme 
von der Diskette entfernen.) 


Geben Sie folgendes ein: 


OPEN15,8,15<RETURN> 
PRINT#15,"NO:MEINE DISKETTE , 20"<RETURN> 


Die Diskette wird sich jetzt für eine Weile drehen und am Ende 
stoppen. Sie müssen nun Ihre Diskette "initialisieren". Geben Sie 
dafür folgendes ein: 


PRINT#15 ,"IO"<RETURN> 


Das ist alles. Jedesmal, wenn Sie eine neue Diskette ins Laufwerk 
geben, müssen Sie diese wie oben angegeben initialisieren. Wenn 
Sie eine Diskette mit "NO:" formatiert haben (N für NEW, aber 
nicht jenes NEW, das Sie benutzen, um den Speicher zu löschen!), 
brauchen Sie es nicht nocheinmal zu machen. Sie melden jedoch je- 
de Diskette an, nachdem Sie diese ins Laufwerk gelegt haben. 
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WARNUNG! 


Der Ausdruck "initialisieren" bedeutet für Ihr Disketten- 
laufwerk: "fertig machen für den Gebrauch". Bei anderen 
Computern versteht man unter "initialisieren" das Formatie- 
ren einer Diskette. Erinnern Sie sich: eine Diskette wird 
einmal formatiert, aber nach jedem Einlegen ins Laufwerk 
initialisiert. Das "Initialisieren" der Diskette in Ihrem 
Commodore-Laufwerk löscht keines der vorhandenen Programme. 
"Formatieren" mit dem "N"-Kommando löscht die Programme auf 
der Diskette. Wenn Sie auf die kleine quadratische Einker- 
bung der Diskette eine "Schreibschutzmarke" kleben, ist 
diese vor zufälligem Löschen geschützt. Eine "schreibge- 
schützte" Diskette kann weder formatiert, noch überschrie- 
ben werden. Wenn Sie also eine Diskette haben, die Sie 
keinesfalls überschreiben möchten, vergewissern Sie sich, 
ob sich auf der Einkerbung ein Schreibschutzaufkleber be- 
findet. Formatieren Sie niemals Ihre TEST/DEMO-Diskette, 
die mit Ihrem Diskettenlaufwerk geliefert wird. 





Um nachzusehen, ob alles korrekt arbeitet, geben Sie folgendes 
ein: 


LOAD"S$S" , 8<RETURN> 
und wenn das rote Licht aus ist 
LIST<RETURN> 


Sie werden jetzt den Namen Ihrer Diskette auf dem Monitor sehen. 
Falls Sie bereits Programme abgespeichert haben, werden diese zum 
Inhaltsverzeichnis (Directory) hinzugefügt und namentlich aufge- 
listet, sobald Sie das "$" Kommando und LIST, wie eben gezeigt, 
eingeben. (Für detailliertere Angaben zum Gebrauch Ihres Disket- 
tenlaufwerks sehen Sie im Kapitel 9 nach.) 


Um ein Programm von der Diskette zu holen, laden Sie es und 
lassen es dann ablaufen. Nehmen Sie Ihre TEST/DEMO-Diskette und 


laden Sie eines der Programme, indem Sie folgendes eingeben: 


LOAD" <PROGRAMMNAME>",8 
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Auf dem B 
sucht wird 
geben Sie 


ildschirm wird zuerst angezeigt, daß das Programm ge- 
. Dann wird es geladen. Wenn das System READY anzeigt, 


RUN<RETURN> 


ein, um da 


s Programm auszuführen. 


Laden und Ausführen von Programmen vom Recorder 


Die Prozed 
der ists 
hensweise: 


1 


ur des Ladens und Ausführens von Programmen vom Recor- 
ehr einfach. Die folgenden Schritte zeigen die Vorge- 


Vergewissern Sie sich, daß der Recorder angeschlossen 
ist und das Band auf den Anfang zurückgespult ist. Wenn 
Sie ein Band mit Programmen besitzen, benutzen Sie die- 
ses zum Test. (Eine Spielkassette <kein Steckmodul> ist 
dafür geeignet.) Wenn Sie kein Band mit einem Programm 
zur Hand haben, geben Sie folgendes Programm ein: 


NEW<RETURN> 

10 PRINT"<MEIN NAME>"<RETURN> 
20 END<RETURN> 

SAVE" ICH"<RETURN> 


Spulen Sie Ihr Band zurück und drücken Sie gleichzei- 
tig die REC- und PLAY-Tasten auf Ihrem Recorder. Wenn 
das Band stoppt und READY auf dem Bildschirm erscheint, 
drücken Sie die STOP-Taste und spulen Sie das Band wie- 
der zurück. 


Schalten Sie Ihren Computer ein und geben Sie, nachdem 
der Cursor erscheint, folgendes ein: 


LOAD" <PROGRAMMNAME> "<RETURN> 
Drücken Sie die PLAY-Taste Ihres Kassettenrecorders. 


Der Bildschirm wird für kurze Zeit dunkel und anschlie- 
ßend sehen Sie folgende Meldung: 
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SEARCHING FOR<NAME DES PROGRAMMS> 
FOUND<NAME DES PROGRAMMS> 

<PRESS THE COMMODOREKEY-LOWER LEFT HAND 
CORNER OF YOUR KEYBOARD> 


Der Bildschirm wird jetzt wieder dunkel und bringt an- 
schließend die Meldung: 


LOADING 
READY 


4. Von diesem Moment an ist Ihr Programm geladen und ab- 
lauffähig. Geben Sie das Wort RUN ein und Ihr Programm 
wird ausgeführt. Wenn Sie unser Beispielprogramm benut- 
zen, erscheint jetzt Ihr Name auf dem Bildschirm. Spu- 
len Sie Ihr Band zurück, so daß es für die nächste Auf- 
nahme bereit ist. 


(Hinweis: Auf dem COMMODORE-64 ist es notwendig, während des 
Ladeprozesses die COMMODORE-Taste zu drücken. Ihr Recorder Manual 
berücksichtigt eventuell diese Tatsache nicht, da Ihr Computer 
möglicherweiser neuer ist als das Manual des Kassettenrecorders.) 


Überspielen von Band auf Diskette 


Wenn Sie sowohl ein Diskettenlaufwerk als auch einen Kas- 
settenrecorder besitzen und nicht die lange Ladezeit beim 
Band abwarten möchten (speziell, wenn Sie mehrere Programme 
nacheinander von Band ablaufen lassen möchten), warum über- 


tragen Sie nicht Ihre Dateien vom Band auf die Diskette? 
Laden Sie nur das DOS, legen Sie eine formatierte Diskette 
ins Laufwerk, initialisieren Sie diese und laden Sie das 
Programm vom Band. Wenn Ihr Bandprogramm geladen ist, 
schreiben Sie einfach SAVE <"NAME DER DATEI>",8 und Ihr 
Programm befindet sich jetzt auf der Diskette und läßt sich 
schneller abarbeiten. 
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Programme im ROM 


Wenn Sie vorgefertigte Programme kaufen, die in einem ROM gespei- 
chert sind, stecken Sie diese nur in den Cartridge-Ausgang und 
schalten Sie Ihren Computer ein. Er wird das Programm automatisch 
starten. 





1.3 Die COMMODORE-64 Tastatur 


Tasten wie bei der Schreibmaschine 


Wenn Sie die Schreibmaschinentastatur kennen, werden Sie die 
meisten dieser Tasten auf der COMMODORE-64-Tastatur wiederfinden. 
Zum größten Teil übernehmen diese Tasten die gleichen Funktionen 
wie die Ihrer Schreibmaschine. Wenn Sie das Wort COMPUTER einge- 
ben und dabei die gleichen Tasten wie bei der Schreibmaschine 
drücken, erscheint das Wort "COMPUTER" auf Ihrem Monitor genau 
wie auf einem Blatt Papier. Nur die Groß- und Kleinbuchstaben 
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werden nicht wie bei Ihrer Schreibmaschine umgeschaltet. Auf dem 
COMMODORE-64 wechseln Sie den Modus Groß-Klein-Schreibung durch 
gleichzeitiges Drücken der "Commodore- Taste" (ganz links unten 
mit dem Commodore-Zeichen) und der SHIFT-Taste. Wenn Sie dies 
machen, können Sie auf der Tastatur wie auf Ihrer Schreibmaschi- 
nentastatur arbeiten. Wünschen Sie Großbuchstaben, drücken Sie 
einfach die SHIFT-Taste und den gewählten Buchstaben wie bei der 
Schreibmaschine. Der Bildschirm hat allerdings nur 40 statt der 
80 Zeichen, die die meisten Schreibmaschinen aufweisen. Natürlich 
können Sie nicht einfach irgend etwas auf dem Bildschirm einge- 
ben. Sie bekommen jedesmal einen "SYNTAX ERROR", wenn Sie die 
RETURN-Taste drücken, bis Sie ein richtiges Kommando eingeben. 
Ansonsten betrachten Sie die Tastatur Ihres Computers wie eine 
normale Schreibmaschinentastatur. (Hinweis: In den meisten unse- 
rer Beispielprogramme benutzen wir nur Großbuchstaben. ) 


Tasten, die Sie auf der Schreibmaschinentastatur 
nicht finden 


Während ein Großteil der Tasten auf Ihrem COMMODORE-64 denen ei- 
ner Schreiblmaschinentastatur gleichen, gibt es doch auch einige 
andere, und es ist daher wichtig, ihre Funktion zu kennen. 


COMMODORE TASTE (Commodore-Zeichen) - Diese Taste - sie befindet 
sich links unten auf der Tastatur - wird benutzt, um von reinen 
Großbuchstaben auf den Groß-Klein-Modus (zusammen mit der SHIFT- 
Taste) umzuschalten und um die, auf den Tasten links stehenden, 
Grafikzeichen auszugeben. Drücken Sie gleichzeitig die COMMODORE- 
und die "S"-Taste, und Sie erhalten das linke Grafikzeichen der 
Taste auf dem Monitor. 


CTRL (CONTROL) - In der oberen linken Ecke Ihrer Tastatur ist die 
CTRL-Taste, genannt "Control-Taste". Durch Drücken der CTRL-Taste 
und einer der Farbtasten (Tasten mit den Nummern 1 bis 8) erhal- 
ten Sie die Möglichkeit, die Farbe Ihres Bildschirms zu wechseln. 
Versuchen Sie die CTRL-Taste zu halten und drücken Sie eine der 
Tasten mit den Nummern 1 bis 8. Sie sehen dann auf dem Monitor 
einen andersfarbenen Cursor. Wenn Sie die CTRL-Taste und die 
Taste mit der Nummer 9 drücken, erhalten Sie eine Inversdarstel- 
lung. Drücken Sie CTRL-9 (gleichzeitig die CTRL-Taste und die 
Nummer 9), und geben Sie einige Buchstaben ein. Probieren Sie 
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auch die CTRL-9 und dann die CTRL-3-Tasten und drücken Sie ein 
paarmal die Leertaste und Sie erreichen interessante Effekte. Um 
die Inversdarstellung wieder auszuschalten, drücken Sie einfach 
die RETURN-Taste oder CTRL-0. Sie verstehen jetzt vielleicht die 
Bedeutung der Markierung auf den Tasten 1 bis 0 (z.B. BLK auf der 
Taste "1"), die für die bestimmten Charakteristiken stehen und 
die Sie durch gleichzeitiges Drücken der CTRL-Taste benutzen. 


RUN/STOP und RESTORE - Diese beiden Tasten liegen auf Ihrer Ta- 
statur einander genau gegenüber, werden aber immer zusammen be- 
nutzt. Die RUN/STOP-Taste allein bewirkt eine Programmunterbre- 
chung. Benutzen Sie die RUN/STOP-Taste und die RESTORE-Taste zu- 
sammen, bringen Sie das Programm wieder in den Normalzustand zu- 
rück. Wenn Sie z.B. unsere Mustervorschläge durchgehen und gerade 
eine andere Farbdarstellung haben als die hellblaue Grundfarbe, 
drücken Sie nur gleichzeitig die RUN/STOP- und die RESTORE-Taste, 
und Ihr Bildschirm wird gelöscht, um dann im Grundzustand wieder 
zu erscheinen. Wenn Sie jemals in Schwierigkeiten kommen und sich 
Ihr System "aufhängt", denken Sie daran, daß die Tasten RUN/STOP 
und RESTORE es wieder starten und die im Speicher befindlichen 
Programme nicht verloren gehen. Betrachten Sie diese Taste als 
"Paniktaste" oder "Reset"-Taste. 


CLR/HOME (CLEAR HOME) - In der rechten oberen Ecke befindet sich 
eine sehr bedeutende Taste, die CLR/HOME-Taste. In der Computer- 
sprache bedeutet "HOME", den Cursor in die obere linke Ecke des 
Bildschirms zu bringen. CLR (Clear) bedeutet, daß der Bildschirm 
vorher gelöscht wird. Um diese Taste zu testen, drücken Sie mehr- 
mals die RETURN-Taste, so daß sich der Cursor unten auf dem 
Monitor befindet. Drücken Sie jetzt die CLR/HOME-Taste und Sie 
werden sehen, wie der Cursor in die obere linke Ecke des Bild- 
schirms springt. Und nun drücken Sie SHIFT-CLR/HOME: der Monitor 
leert sich und der Cursor steht immer noch oben in der gleichen 
Position. (Geben Sie ruhig etwas Text ein und probieren Sie den 
Unterschied der CLR/HOME- und der SHIFT-CLR/HOME-Taste.) 


CRSR (CURSOR) - In der rechten unteren Ecke der Tastatur befinden 
sich die Cursortasten. Sie werden benutzt, um den Cursor auf dem 
Bildschirm in jede beliebige Position zu bringen, ohne das Bild 
zu bewegen. Die Pfeile auf den Tasten markieren die Richtung, 
einmal mit, einmal ohne Drücken der SHIFT-Taste. Probieren Sie 
zur Übung folgendes: Drücken Sie SHIFT-CLR/HOME und plazieren Sie 
anschließend den Cursor in die Mitte des Bildschirms, nur unter 
Zuhilfenahme der CRSR-Tasten. Haben Sie dies geschafft, können 
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Sie mit den Tasten sicher umgehen. Wenn Sie die Cursortaste in 
Anführungszeichen eingeschlossen innerhalb einer PRINT-Anweisung 
"schreiben", geschehen merkwürdige Dinge. Der Computer interpre- 
tiert diese Taste jetzt als ein auf dem Bildschirm zu druckendes 
Zeichen. Geben Sie als Beispiel folgendes ein: 


PRINT" (PRESSEN SIE JETZT 10 X DIE CURSORTASTE)HALLO" 
<RETURN> 


Sie bekommen eine Reihe von inversen "Q's", wenn Sie die "CRSR 
nach unten" drücken. Nachdem Sie auch die RETURN-Taste betätigt 
haben, sehen Sie die Nachricht "HALLO" zehn Zeilen unterhalb der 
eingegeben Kommandozeile. 


RETURN - Die RETURN-Taste ist wie die Taste für den Zeilenvor- 
schub auf Ihrer Schreibmaschine. Sie wird oft auch als "Carriage 
Return" oder "CR" bezeichnet. Die Taste arbeitet analog zur 
Carriage-Return-Taste der Schreibmaschine, da der Cursor an die 
linke Seite des Bildschirms springt, nachdem Sie die Taste betä- 
tigt haben. Es gibt jedoch auch andere Bedeutungen der RETURN- 
Taste, die Sie noch während des Programmierens kennenlernen wer- 
den. 


Arrow- und Pi-Taste - Ganz links oben auf der Tastatur finden Sie 
eine Taste, die einen horizontalen Pfeil ausgibt. Die vertikale 
Pfeiltaste auf der rechten Seite der Tastatur besitzt neben der 
Grafik- noch weitere Funktionen. In der Normalstellung können Sie 
mit dieser Taste Zahlen potenzieren. Geben Sie z.B. 2°“ 2 und 
RETURN ein, so erhalten Sie "4" auf dem Bildschirm, d.h. den Wert 
2 mit 2 potenziert. Jetzt geben Sie SHIFT-* <RETURN> ein und Sie 
erhalten 3.14159265, den Wert für Pi. 


INST/DEL - Diese Taste ist eine "Editier-Taste" für INSert (Ein- 
fügen) oder DELete (Löschen). In Kapitel 2 werden wir diese 
Funktion genauer erklären. 


TASTATUR GRAFIK - An der Vorderseite der meisten Tasten befinden 
sich verschiedene Grafikzeichen. Diese Zeichen werden auf dem 
Bildschirm dargestellt, indem Sie das gewünschte Grafikzeichen 
zusammen mit der SHIFT- oder COMMODORE-Taste drücken. Die rechten 
Grafikzeichen auf jeder Taste werden mit der SHIFT-Taste, die 
linken Zeichen mit der COMMODORE-Taste betätigt. (Die rechten 
Grafikzeichen können nicht direkt ausgegeben werden, wenn Sie 
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sich im Groß-Kleinbuchstaben-Modus befinden.) Probieren Sie diese 
Grafikzeichen mit Hilfe der SHIFT- und der COMMODORE-Taste gleich 
aus. 


FUNKTIONSTASTEN - Ganz rechts liegen die sogenannten "Funktions- 
tasten". Sie sind von "f1" bis "f8" durchnumeriert. Diese Tasten 
werden durch spezielle Kommandos Ihres Programms betätigt. Da 
diese Tasten etwas komplizierter sind, werden sie in Kapitel 10 
getrennt behandelt. Sie brauchen die Tasten im Moment noch nicht. 
Wenn Sie jedoch schon etwas Programmiererfahrung haben, können 
Sie in Kapitel 10 nachschlagen, wie diese Tasten im Programm ver- 
wendet werden. 


EINIGE NEUE BEDEUTUNGEN FÜR BEKANNTE TASTEN - Einige der be- 
kannten Tasten haben für den Computer eine andere Bedeutung, als 
vom Symbol her anzunehmen wäre. Viele dieser Tasten haben mathe- 
matische Funktionen. Im nächsten Kapitel werden wir illustrieren, 
wie diese Tasten eingesetzt werden, und sie im Detail besprechen. 
Deshalb sehen wir uns hier die Tasten nur ganz kurz an. 


SYMBOL BEDEUTUNG 

+ Addieren 
Subtrahieren 
Multiplizieren (anders als konventionell) 
Dividieren (anders als konventionell) 
Potenzieren 


„y N »#I 


Zusätzlich zu diesen neuen Darstellungen für mathematische Sym- 
bole werden noch andere Tasten in einer Weise benutzt, die Ihnen 
nicht gebräuchlich erscheinen wird. Wir werden später die genaue 
Bedeutung dieser Tasten erklären, führen jedoch unten eine Reihe 
davon auf, um Ihnen zu zeigen, welche Möglichkeiten Ihr COMMODO- 
RE-64 überhaupt aufweist. 


SYMBOL BEDEUTUNG 


S indiziert eine String-Variable 
wird als "Endekennzeichen eines Statements" 
im Programm benutzt 

% indiziert eine variable Ganzzahl 

? Abkürzung des PRINT-Kommandos 
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Machen Sie sich keine Gedanken, wenn Sie die Bedeutung dieser 
Zeichen im Moment noch nicht verstehen. Sie sollen mit Hilfe der 
Tasten nur auf die "Computersprache" vorbereitet werden. Wenn Sie 
mit der Tastatur und der Bedeutung der einzelnen Tasten etwas 
vertrauter werden, können Sie diese ganz einfach einsetzen. Es 
reicht vorerst, wenn Sie sich der unterschiedlichen Bedeutung der 
Tasten bewußt sind. 


1.4 Zusammenfassung 


Das erste Kapitel war ein Überblick über Ihre neue Anlage. Sie 
sollten jetzt wissen, wie Sie die einzelnen Teile Ihrer COMMODO- 
RE-64 Anlage aufstellen und zum Arbeiten bringen. Sie sollten 
auch in der Lage sein, eine Diskette zu laden, zu initialisieren, 
sich das Inhaltsverzeichnis Ihrer Diskette anzulegen (CATALOG) 
und ein Programm von Diskette oder Band laufen zu lassen. Auch 
sollten Sie einige der grundlegenden DOS-Kommandos zum Manipulie- 
ren Ihrer Dateien kennen. Schließlich sollten Sie mit der Tasta- 
tur bekannt sein und wissen, was mit Cursor gemeint ist. Im Mo- 
ment gibt es noch sehr viel zu lernen. Lassen Sie sich also nicht 
entmutigen, wenn Sie vieles noch nicht ganz verstehen. Während 
unserer weiteren Schritte werden Sie mehr und mehr dazulernen, 
und was Sie im Augenblick vielleicht noch verwirrt, wird bald 
klar sein. Haben Sie Vertrauen zu sich selbst, und Sie werden 
bald Dinge ausführen können, die Sie nie für möglich hielten. 


Im nächsten Kapitel werden Sie lernen, wie Sie Ihren COMMODORE-64 
programmieren können. Es ist sehr wichtig, daß Sie die folgenden 
Beispiele eintippen und laufen lassen. Ebenfalls ist es emp- 
fehlenswert die vorgeschlagenen Änderungen nach dem ersten Ver- 
such durchzuführen, damit Sie sehen, was Sie mit diesen geringfü- 
gigen Änderungen erreichen. Es gibt sowohl praktische, wie auch 
lustige (und verrückte) Programme in diesem Buch. Neben der Ar- 
beit sollen Sie auch Freude an den Programmen haben. 
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Einführung 


Dieses Kapitel will Sie anweisen, Programme in der Sprache BASIC 
zu schreiben. COMMODORE-64-BASIC unterscheidet sich von einigen 
anderen Versionen dieser Sprache. Wenn Sie bereits etwas BASIC 
können, werden Sie diese Unterschiede bald herausfinden. Ist es 
für Sie jedoch eine neue Sprache, werden Sie feststellen, daß 
Programmieren in BASIC sehr einfach ist. Um zu starten, schalten 
Sie Ihren Computer ein, und wenn Sie auf dem Bildschirm das 
"READY"-Zeichen vorfinden, können Sie mit dem Programmieren be- 
ginnen. Wenn Sie auf dem Monitor etwas anderes sehen, drücken Sie 
gleichzeitig die RESTORE- und die STOP/RUN-Taste und geben Sie 
NEW ein, um den Speicher zu löschen. 
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2.1 PRINT 


Das in BASIC wahrscheinlich am häufigsten benutzte Kommando ist 
PRINT. Wörter in Anführungszeichen, die dem PRINT-Kommando fol- 
gen, werden auf dem Monitor ausgegeben; ebenso Nummern und Varia- 
blen, wenn sie in einem PRINT-Kommando eingeschlossen sind. Es 
wird benutzt, um den Computer zur Druckausgabe auf dem Bildschirm 
oder Drucker anzuweisen; entweder innerhalb eines Programms oder 
im Kommandomodus. Sie werden sich jetzt bestimmt fragen, was der 
Unterschied zwischen Programmodus und Kommandomodus ist. Hierzu 
ein Beispiel: 


Kommandomodus - Der Kommandomodus führt ein Kommando sofort aus, 
nachdem Sie RETURN drücken. Probieren Sie z.B. folgendes aus: 


PRINT "DAS IST DER KOMMANDOMODUS"" 
DAS IST DER KOMMANDOMODUS 


READY. 


Sehen Sie, wie einfach das war? Geben Sie jetzt einige Zahlen 
aus, ohne diese in Anführungszeichen einzuschließen: 


PRINT 6<RETURN> 
PRINT 54321 <RETURN> 


Wie Sie sehen, können Sie Zahlen eingeben, ohne das Anführungs- 
zeichen zu benutzen. Wie Sie später bemerken werden, wird der 
genaue Wert der Zahlen wie ein "Bild" in den Speicher gestellt. 


Programmodus - Dieser Modus stellt die Ausführung der Kommandos 
so lange zurück, bis Sie RUN eingeben. Alle Kommandos, die mit 
einer Zeilennummer auf der linken Seite beginnen, werden als Tei- 
le eines Programms behandelt. Probieren Sie folgendes: 


10 PRINT "DAS IST DER PROGRAMMODUS"<RETURN> 


Es geschieht nichts, richtig? 
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Geben Sie das RUN-Kommando. Ihr Bildschirm sieht jetzt so aus: 


10 PRINT "DAS IST DER PROGRAMMODUS" 
RUN 
DAS IST DER PROGRAMMODUS 


READY. 


2.2 Ihr erstes Programm 


Löschen des Bildschirms und Schreiben Ihres Namens 


Lassen Sie uns ein Programm schreiben und zwei neue Kommandos 
lernen. Die neuen Kommandos sind CLR/HOME und END. Das CLR/HOME- 
Kommando löscht den Bildschirm und plaziert den Cursor oben 
links. Das CLR/HOME-Kommando wird durch gleichzeitiges Drücken 
der Taste CLR/HOME und der SHIFT-Taste eingegeben. Im Programmo- 
dus erscheint CLR/HOME als kleines Herz auf Ihrem Bildschirm. 
Keine Angst, es funktioniert. Das END-Kommando teilt dem Computer 
das Ende der auszuführenden Kommandos mit. Geben Sie im Kommando- 
modus das CLR/HOME-Kommando ein und verfolgen Sie was passiert. 
Lassen Sie uns jetzt ein Programm mit dem CLR/HOME-, END- und 
PRINT-Kommando schreiben. Drücken Sie von jetzt an die RETURN- 
Taste am Ende jeder Zeile. Für den Rest des Buches werde ich das 
<RETURN> nicht mehr aufführen, ausgenommen für Eingaben im Kom- 
mandomodus. 


10 PRINT "<CLR/HOME>":REM EIN KLEINES HERZ ERSCHEINT 
AUF IHREM BILDSCHIRM 

20 PRINT "<MEIN NAME>" 

30 END 

RUN<RETURN> 


Alles was Sie auf dem Bildschirm sehen sollten, ist Ihr Name, an- 
schließend READY. Wir werden Ihnen jetzt zwei Kürzel vorstellen, 
die Ihnen helfen, Zeit bei der Eingabe und Platz im Speicher zu 
sparen. Erstens ist es möglich, mehrere Kommandos hintereinander 
in eine Zeile zu schreiben, wenn man sie durch Doppelpunkte ":" 
trennt. Ferner können Sie anstelle von PRINT das Fragezeichen "?" 
eingeben. Probieren Sie folgendes Programm, um dies zu testen: 
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10 ? "<CLR/HOME>" 
20 ? "<MEIN NAME>":END 
RUN<RETURN> 


Es passiert genau dasselbe, aber Sie mußten nicht so viele Zeilen 
eingeben und das Wort PRINT nicht ausschreiben. Gut, oder? Noch 
etwas: Beginnen Sie Ihr Programm IMMER mit PRINT "CLR/HOME". Dies 
wird Ihnen helfen, Schwierigkeiten zu vermeiden, wenn Sie unter- 
schiedliche Programme laufen lassen. Es wird auch Ausnahmen von 
dieser Regel geben. Aber größtenteils starten Sie Ihre Eingaben 
mit CLR/HOME, und dadurch beginnen Sie mit einem leeren Bild- 
schirm anstatt mit einem großen Wirrwarr. 


Am Anfang wird es sicherlich besser sein, den Doppelpunkt weniger 
häufig zu benutzen. Es ist auf diese Weise einfacher, die einzel- 
nen Zeilen in einem Programm zu verstehen. Später, wenn Sie mehr 
Übung im Programmieren haben und Wege herausfinden möchten, um 
Speicherplatz zu sparen oder den Programmlauf zu beschleunigen, 
werden Sie den Doppelpunkt wesentlich häufiger benutzen. Schrei- 
ben Sie auch Ihre REM-Statements so kurz wie möglich. Dies sind 
Bemerkungszeilen und sie enden mit der nächsten Zeilennummer, die 
ein auszuführendes Kommando enthält. Sie dienen dazu, anderen den 
Programmablauf in den nachfolgenden Zeilen zu erklären, und sind 
auch für Sie selbst als kleine Erinnerung gut, um gleich zu se- 
hen, was im Programm passiert. Um zu sehen, wie sie funktionie- 
ren, lassen Sie uns einige REM-Zeilen in ein kleines Programm 
einfügen. 


10 PRINT "<CLR/HOME>":REM DIES LÖSCHT DEN SCHIRM 
20 PRINT "<MEIN NAME>":END 

30 REM DIESES PRÄCHTIGE PROGRAMM WURDE ERSTELLT 
VON <MEIN NAME> 


Wenn Sie jetzt RUN eingeben und das Programm laufen lassen, sehen 
Sie, daß die REM-Statements nicht auf dem Schirm erscheinen. Den- 
noch ist es sehr viel klarer, was ein Programm macht, wenn Sie 
hinter den Kommandos eine Erklärung in der Programmliste sehen. 
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2.3 Erstellen eines Programms 


Benutzen von Zeilennummern 


Nachdem wir nun schon ein kleines Programm geschrieben haben, 
sehen wir uns die Zeilennummern etwas genauer an. In Ihrem ersten 
Programm haben wir die Zeilennummern 10, 20 und 30 benutzt. Wir 
hätten auch die Nummern 0, 1 und 2 oder sogar 1000, 2000 und 3000 
nehmen können. Es ist auch nicht wichtig, gleichmäßige Abstände 
zwischen den einzelnen Nummern zu verwenden. Ihr Programm arbei- 
tet genau so gut mit den Zeilennummern 1, 32 und 1543. 


Gewöhnlich werden wir unsere Programme in Zehnerschritten durch- 
numerieren und mit 10 beginnen. Sie werden zu Recht fragen, "Ist 
es nicht einfacher, Nummer 1, 2, 3, 4, 5, usw. zu nehmen?",. 
Manchmal sicherlich, grundsätzlich aber nicht! Hier eine Begrün- 
dung: Tippen Sie das Wort LIST <RETURN> ein und wenn Ihr Programm 
noch im Speicher ist, wird es jetzt auf dem Bildschirm erschei- 
nen. Stellen Sie sich vor, Sie möchten eine Zeile zwischen die 
Zeilen 20 und 30 einfügen, um Ihre Adresse auszudrucken. Anstatt 
das Programm neu einzutippen, brauchen Sie jetzt nur eine Zeilen- 
nummer zwischen 20 und 30 (z.B. 25) zu wählen und diese einzuge- 
ben. Lassen Sie uns das einmal probieren; entfernen Sie aber 
zuerst das END-Kommando aus der Zeile 20. 


25 PRINT "<MEINE ADRESSE>" 
RUN<RETURN> 


Aha! Sie sehen jetzt also Ihren Namen und Ihre Adresse auf dem 
Monitor. Sie mußten nur eine weitere Zeile eingeben, anstatt das 
ganze Programm zu wiederholen. Hätten Sie jedoch das Programm von 
1 bis 10 durchnumeriert, wären Sie nicht in der Lage, zwischen 
den Zeilen 2 und 3 eine weitere Zeile einzufügen, wie es zwischen 
den Zeilen 20 und 30 möglich war. Sie müßten das gesamte Programm 
neu eintippen. Bei einem kleinen Programm ist das zwar kein Pro- 
blem, wenn Sie aber 100- oder 1000zeilige Programme schreiben, 
werden Sie froh sein, zwischen den einzelnen Nummern etwas zu- 
sätzlichen Platz zu haben. 
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Auflisten Ihres Programms 


Wie wir eben sahen, benutzen wir das Wort LIST, um unser Programm 
aufzulisten. Um dies besonders gut zu machen, geben Sie <SHIFT>- 
<CLR/HOME> und LIST <RETURN> ein und Sie bekommen das Listing auf 
einem leeren Bildschirm. Wenn Sie jedoch längere Programme 
schreiben, möchten Sie nie das gesamte Programm, sondern nur Tei- 
le davon auflisten. Lassen Sie uns die möglichen Optionen des 
LIST-Kommandos prüfen. 


SIE SCHREIBEN SIE ERHALTEN 
LIST Listing des gesamten Programms 
LIST 20 nur die Zeile 20 wird aufgelistet (oder 


eine andere gewählte Nummer. ) 


LIST 20-30 alle Zeile von 20 bis inclusive 30 wer- 
den aufgelistet (oder eine andere Rei- 
henfolge von Nummern.) 


LIST -40 auflisten vom Beginn des Programms bis 
zur Zeile 40 (oder einer anderen gewähl- 
ten Zeilennummer.) 


LIST 40- auflisten, ab der Zeile 40 (oder einer 
anderen gewählten Zeilennummer) bis an 
das Ende des Programms. 


Versuchen Sie, verschiedene Teile Ihres Programms mit den mögli- 
chen Optionen aufzulisten, und sehen Sie nach, was Sie erhalten. 
Die folgenden Kommandos geben Ihnen ein Beispiel der unterschied- 
lichen Optionen: 


LIST 25 
LIST 20- 
LIST -20 
LIST 25-30 
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Erlauben wir uns einen Spaß? 


Gewöhnlich. benutzen Sie das LIST-Kommando im Kommandomodus 
nach der Erstellung des Programms. Sie können es aber auch 
im Programm verwenden. Fügen Sie nur zum Spaß folgende Zei- 
le an Ihr Programm: 


40 LIST 


Geben Sie nun RUN ein und schauen Sie, was passiert. Ob Sie 
es glauben oder nicht: das ist eine sehr nützliche Anwen- 
dung, wie wir noch später in einigen Beispielen sehen wer- 
den. Im Moment ist es nur ein Spaß. Und nun zurück zum 
ernsthaften Stoff. 





Abspeichern des Programms 


Stellen Sie sich vor, Sie schreiben ein Programm; es läuft auch 
ganz richtig und nun schalten Sie Ihren Computer aus. Solange 
sich das Programm nur im RAM-Speicher befindet, wird es sich in 
NICHTS auflösen, und Sie sind gezwungen, es wieder einzutippen, 
um es laufen zu lassen. Glücklicherweise ist es eine einfache An- 
gelegenheit, ein Programm auf Diskette abzuspeichern (SAVE). 
Nehmen wir unser Programm her, um das Abspeichern eines Programms 
auf Diskette zu probieren. Vergewissern Sie sich mit LIST, daß 
sich das Programm noch im Speicher befindet; andernfalls tippen 
Sie es erneut ein. Sehen Sie auch nach, ob sich im Diskettenlauf- 
werk eine formatierte und initialisierte Diskette befindet und 
geben Sie folgendes ein: (Wenn Sie sich mit dem Formatieren und 
Initialisieren der Diskette nicht ganz sicher sind, blättern Sie 
bitte zurück in Kapitel 1, wo beides erklärt wird.) 


SAVE "0:MEIN PROGRAMM" ,8 


Die Diskette wird sich jetzt drehen und das rote Licht an Ihrer 
Disketteneinheit leuchten. Wenn es erlischt, geben Sie LOAD "$",8 
ein und wenn das READY erscheint, LIST. Sie werden überrascht 
sein, das Inhaltsverzeichnis zu sehen. Denn 


45 


Grundlagen 


MEIN PROGRAMM 


steht jetzt im Inhaltsverzeichnis, d.h. das Programm wurde er- 
folgreich auf der Diskette abgespeichert. 


Speichern des Programms auf Band 


Um ein Programm auf Band zu speichern, legen Sie ein leeres Band 
in Ihren Recorder und spulen Sie es zurück. Drücken Sie gleich- 
zeitig die RECORD- und PLAY-Taste Ihres Recorders und geben Sie 
SAVE "MEIN PROGRAMM" ein. Der Kassettenrecorder läuft an und die 
Nachricht OK erscheint zusammen mit SAVING MEIN PROGRAMM auf dem 
Bildschirm. Anschließend sehen Sie das READY. Ihr Programm ist 
jetzt auf Band gespeichert. Anders als bei der Diskette brauchen 
Sie keine "Ausgangsnummer" anzugeben (z.B. 8), da der COMMODORE- 
64 standardmäßig bei SAVE auf Band zugreift. 
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Zurückholen Ihres Programms 


Um sich zu vergewissern, ob Sie ein Programm auf Band oder Dis- 
kette gesichert haben, schalten Sie Ihren COMMODORE-64 aus und 
gleich wieder ein. Tun Sie dies bitte. lInitialisieren Sie Ihre 
Diskette, indem Sie OPEN 15,8,15 und PRINT#15,"INITIALIZEO0" ein- 
geben; anschließend LOAD"$",8 und LIST, um sich das Inhaltsver- 
zeichnis anzusehen. Jetzt tippen Sie LOAD "0:MEIN PROGRAMM",8. 
Das Laufwerk dreht sich für eine Weile; Ihr Programm wird gela- 
den und das READY erscheint erneut. LIST und RUN zeigt Ihnen, daß 
es dasselebe Programm ist, das Sie mit SAVE abgespeichert haben. 
Wenn es dasselbe Programm ist, haben Sie einen Beweis, daß Ihr 
Abspeichern erfolgreich war. 


Besitzen Sie eine Bandeinheit, dann drücken Sie nur die PLAY- 
Taste des Recorders und geben Sie LOAD "MEIN PROGRAMM" ein. Das 
Band läuft an, um das Programm zu suchen, lädt es und anschlie- 
ßend meldet sich Ihr Computer mit dem READY. Mit LIST und RUN 
sehen Sie das gleiche Programm, das Sie gesichert haben. 


Ein Sicherungstip 


Wenn Sie beginnen, längere Programme zu schreiben - aber 
auch nur bei einigen Zeilen -, sollten Sie das Programm auf 


Band oder Diskette sichern. Übrigens, wenn Ihre Katze zu- 
fällig mal über die Tastatur läuft und dabei den Computer 
ausschaltet, ist somit Ihr Programm nicht verloren und Sie 
brauchen nicht auf die Katze loszugehen. Sie schützen so 
beides, Programm und Katze. 





Da Sie nun Programme abgespeichert und wieder geladen haben, 
lassen Sie uns einen neuen netten Trick versuchen. Erinnern Sie 
sich, daß Sie Ihr Programm unter dem Namen MEIN PROGRAMM abge- 
speichert haben? Lassen Sie uns den Inhalt der Datei ändern. Ge- 
ben Sie erst folgendes ein und listen Sie dann das Programm 
wieder auf: 
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27 PRINT "<MEINE ADRESSE>" 


Ihr Programm unterscheidet sich jetzt von dem Programm, das Sie 
unter dem Namen MEIN PROGRAMM abgespeichert haben, bevor Sie 
Zeile 27 hinzufügten. Tippen Sie nun 


SAVE "S0:MEIN PROGRAMM" ‚8<RETURN> 


Löschen Sie nun den Bildschirm, laden Sie es, und listen Sie es 
auf. Wie Sie sehen, ist die Zeile 27 jetzt ein Teil von MEIN PRO- 
GRAMM. Um ein Programm zu verändern, löschen oder fügen Sie Zei- 
len hinzu und speichern es unter dem gleichen Namen wieder ab, 
indem Sie "8" vor der "0" eingeben. Wie auch immer, seien Sie 
vorsichtig. Ganz gleich, welches Programm sich gerade im Speicher 
befindet, es wird unter dem eingegebenen Namen gesichert. Wenn 
Sie beispielsweise PROGRAMM A auf Ihrer Diskette haben, PROGRAMM 
B eintippen und unter unter dem Namen PROGRAMM A abspeichern, 
wird PROGRAMM A zerstört, und das abgespeicherte Programm ist das 
eigentliche PROGRAMM B. Auch wenn Sie ein sehr wichtiges Programm 
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haben, machen Sie davon eine "Sicherungskopie" (BACKUP). Wenn Sie 
z.B. Ihr erstes Programm unter dem Namen MEIN PROGRAMM und MEIN 
PROGRAMM BACK-UP abspeichern, haben Sie zwei Dateien mit ein und 
demselben Programm. Um dies auch wirklich sicher zu machen, neh- 
men Sie dazu zwei unterschiedliche Disketten. 


Ich habe Sie gewarnt 


Früher oder später wird Ihnen folgendes passieren: Sie 
haben mehrere Disketten, formatierte und Programmdisketten. 
Sie nehmen die falsche Diskette (oder Band), eine Programm 
diskette. Sie ist nicht schreibgeschützt, und nachdem Sie 
die Diskette oder das Band neu formatiert und somit alle 


Ihre wertvollen Programme gelöscht haben, werden Sie "1&$# 
?1%&" schreien und sich die Haare raufen. Sie glauben das 
nicht, bis es einmal passiert ist. Um sich davor zu schüt- 
zen, MACHEN SIE BACK-UP'S. Nehmen Sie Ihre Originale und 
bewahren Sie diese außer Reichweite auf. Falls Sie jetzt 
eine Diskette oder ein Band irrtümlich zerstört haben, 
machen Sie einfach noch eine COPY Ihrer Originaldiskette. 





2.4 Verwendung des Editors 


Fehlermeldungen und ihre Aufhebung 


Es ist Ihnen vielleicht schon einmal passiert, daß Sie einen 
?SYNTAX ERROR, ?SYNTAX ERROR IN 30 (Fehler in Zeile 30 oder einer 
anderen Zeile, in der ein Fehler entdeckt wurde) oder eine andere 
Fehlermeldung, wie z.B. REDO FROM START (die Ihnen mitteilt, daß 
etwas fehlt) angezeigt bekamen. Dies geschieht im Komandomodus, 
sobald Sie RETURN drücken, und im Programmodus, sobald Sie RUN 
eingeben. Abhängig vom Fehler bekommen Sie eine unterschiedliche 
Fehlermeldung. Abhängig von unterschiedlichen Operationen werden 
wir im Verlauf der nächsten Abschnitte verschiedene Fehlermeldun- 
gen kennenlernen. Im Moment werden wir uns die Möglichkeit näher 
ansehen, wie wir Fehler in Programmzeilen genau so schnell besei- 
tigen, wie sie entstehen. Der Prozeß wird als "Editieren" des 
Programms verstanden. 


49 


Grundlagen 







Computer! 


Löschen von Zeilen 


Der Editor in Ihrem 


Die einfachste Art des Editierens besteht aus dem Einfügen und 


Löschen von Zeilen. Lassen Sie uns ein fehlerhaftes 


schreiben und dieses dann verbessern. 


NEW<RETURN> 

10 PRINT "<CLR/HOME>" 

20 PRINT "SOLANGE ETWAS FALSCH" 

30 PRINT :"LAUFEN KANN":REM FEHLERZEILE 
‚40 PRINT "ES GEHT" 

50 END 

RUN<RETURN> 


Wenn das Programm genau wie oben eingegeben wurde, 
?SYNTAX ERROR IN 30. Tippen Sie nun: 


30<RETURN> 
LIST<RETURN> 
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Wo ist die Zeile 30? Sie haben eben gelernt, eine Zeile zu 1ö- 
schen. Immer wenn Sie nur eine Zeilennummer eingeben, löschen Sie 
diese Zeile. Wir haben auch schon gelernt, eine Zeile einzufügen. 
Geben Sie daher folgendes ein, um das Programm zu verbessern: 


30 PRINT "LAUFEN KANN" 


Wenn Sie nun das Programm laufen lassen, sollte alles in Ordnung 
sein. Der Fehler war der Doppelpunkt zwischen dem PRINT-Befehl 
und den Worten, die gedruckt werden sollten. Ein anderer Weg, das 
Programm zu verbessern, ist, die Zeilennummer neu einzugeben, oh- 
ne diese vorher zu löschen. Ich wollte jedoch gleichzeitig das 
Löschen von Programmzeilen vorführen. 


Benutzen des Commodore-64 Editors 


In Ihrem COMMODORE-64 steckt ein wirklicher Editor. Um zu sehen, 
wie Sie damit arbeiten, geben wir nochmals ein fehlerhaftes Pro- 
gramm ein und verbessern dieses. Geben Sie folgendes Programm 
ein, und lassen Sie es ablaufen: 


NEW 

10 PRINT "<CLR/HOME>" 

20 PRINT "WENN ICH ETWAS FALSCH MACHE" 

30 PRINT "KANN ICH": ES VERBESSERN: REM FALSCHE ZEILE 
40 END 

RUN<RETURN> 


Richtig, Sie bekamen einen ?SYNTAX ERROR IN 30. Anstatt die Zeile 
neu einzugeben, probieren Sie folgendes; 


1. Listen Sie das Programm. 
2. Drücken Sie SHIFT und CRSR (vertikaler Cursor - die 
linke Cursortaste unter der RETURN Taste), und führen 


Sie den Cursor zur Zeile 30. 


3% Benutzen Sie jetzt die rechte Cursortaste und bringen 
Sie den Cursor direkt auf den ersten Doppelpunkt. 
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4. Drücken Sie INST/DEL, bis das Anführungszeichen und 
der Doppelpunkt hinter ICH verschwinden. 


5, Drücken Sie die rechte Cursortaste, bis der Cursor 
direkt auf dem Doppelpunkt steht. Jetzt drücken Sie 
SHIFT INST/DEL und sehen Sie, wie der Cursor eine Stel- 
le nach rechts springt. 


6. Tippen Sie nun ein Anführungszeichen hinter das "N" 
von "VERBESSERN" in die Leerstelle, die der Editor 
durch das INSert eingefügt hat. Drücken Sie RETURN und 
Sie haben die Zeile verbessert. 


Listen Sie nun das Programm noch einmal auf: Zeile 30 sollte 
jetzt korrekt sein. Lassen Sie es laufen. In dem Statement soll- 
ten Sie jetzt "WENN ICH ETWAS FALSCH MACHE, KANN ICH ES VERBES- 
SERN" sehen. Aber es gibt noch mehr zu lernen. Geben Sie folgen- 
des Programm ein: (Erinnern Sie sich, daß Sie im COMMODORE-64-BA- 
SIC das ? anstelle des PRINT verwenden können? Wenn Sie das 
Programm vor dem RUN auflisten, werden Sie sehen, daß anstelle 
des ? plötzlich PRINT-Statements stehen.) 


10 ?"<CLR/HOME>" 

20: ?"MANCHMAL MAG ICH LANGE, LANGE, LANGE, 

LANGE ZEILEN": WUH! 

30 ?"UND MANCHMAL MAG ICH KURZE ZEILEN" 

40 END 

LIST<RETURN> (Beobachten Sie, was mit den ? passiert.) 
RUN<RETURN> 


Nun, nachdem Sie das Programm gestartet hatten, ging es schief. 
Das Problem steckte in dem Wort WUH!, weil es ohne PRINT-Anwei- 
sung oder Anführungszeichen hinter dem Doppelpunkt stand, auch 
keine REM-Zeile darstellte und die Zeile beendete. Um dies zu 
verbessern, bringen Sie den Cursor mit Hilfe der CRSR-Taste in 
die Zeile 20, d.h. in die fehlerhafte Zeile. Um die Sache zu ver- 
einfachen, entfernen Sie das zweite Anführungszeichen, lassen den 
Doppelpunkt stehen und fügen hinter dem Wort WUH! ein Anführungs- 
zeichen ein. Da der Doppelpunkt nun innerhalb der Anführungszei- 
chen steht, wird er als Teil des PRINT-Befehls ausgegeben und als 
Endekennzeichen des Befehls ignoriert. Drücken Sie RUN und RE- 
TURN. 
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Lassen Sie uns nun ein Merkmal des COMMODORE-64-Editors ansehen, 
das eventuell Schwierigkeiten mit sich bringt. Geben Sie fol- 
gendes ein, OHNE RETURN ZU DRÜCKEN! ! ! I: 


20 PRINT "ICH MAG MEINEN COMPUTEEEEER 


Hoppla! Da ist ein Fehler, aber Sie haben die Zeile noch nicht 
beendet. Keine Panik. Drücken Sie nur (SHIFT) H-CRSR und bringen 
den Cursor auf die mehrfach eingegebenen "E's" zurück. Tippen Sie 
es nun korrekt ein. (H-CRSR ist der "horizentale Cursor" und V- 
CRSR der "vertikale Cursor".) Sie sehen dies auch, wenn Sie die 
CRSR-Taste drücken, ohne den Cursor zu bewegen, dann bekommen Sie 
vertikale inverse Linien oder Klammern. Mit dem vertikalen Cursor 
bekommen Sie große blaue Punkte und inverse "Q's". Was ist pas- 
siert!?? 


Nicht so stürmisch, Watson. Wie wir in Kapitel 1 erwähnt haben, 
gibt Ihnen der COMMODORE-64 die Möglichkeit, in Anführungszeichen 
eingeschlossene, invers dargestellte Zeichen auszugeben, die Sie 
durch drücken der CRSR-Taste erzeugen. Um Änderungen vorzunehmen, 
drücken Sie erst RETURN und benutzen Sie dann die CRSR-Taste, um 
den Cursor an die zu verbessernde Zeile zu bringen. Wie Sie 
sehen, arbeiten die CRSR-Tasten jetzt richtig, auch innerhalb der 
Anführungszeichen. (ANMERKUNG: Lassen Sie mich noch sagen, daß es 
einfacher gewesen wäre, ein paarmal die INST/DEL-Taste zu drük- 
ken, um die mehrfachen "E's" zu beseitigen. Auf diese Weise hät- 
ten Sie aber nicht gelernt, warum die CRSR-Tasten, eingeschlossen 
in Anführungszeichen, anders arbeiten.) 


Achten Sie auf 'RUNDY' 


Nach dem Editieren mit dem COMMODORE-64 habe ich oft RUN 
über die READY-Meldung eingegeben und somit "RUNDY" erhal- 


ten. Natürlich gibt das statt RUN jetzt einen ?SYNTAX ER- 
ROR. Bei manchen Computern werden nach der Eingabe von RUN 
alle folgenden Buchstaben vergessen. Achten Sie, gerade 
wenn Sie auf anderen Computern schon geübt sind, auf dieses 
RUNDY! 
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Weiter im Editieren 


Bevor wir weitermachen, wollen wir uns noch etwas mit dem Editor 
beschäftigen. Wir werden das Einfügen von Zeichen und Nummern 
üben, sowie auch das Editieren von Zeichengruppen. Probieren Sie 
folgendes kleine Programm: 


10 PRINT "CLR/HOME" 

20 PRINT "JETZT IST ZEIT FÜR ALLE GUTEN MÄNNER"; 
30 PRINT "ZU KOMMEN, UM IHR LAND ZU SCHÜTZEN" 
40 END 


So weit, so gut. Sie wollten aber auch die Frauen in die Zeile 20 
eingeben. Sie können jetzt die gesamte Zeile neu eingeben; einfa- 
cher ist es jedoch, nur UND FRAUEN hinter MÄNNER einzufügen. 
Ebenso stört es Sie vielleicht, wenn alles in Großbuchstaben ein- 
gegeben ist. Lassen Sie uns die Zeile verbessern und dabei Groß- 
/Kleinschreibung verwenden: 


Ir Drücken Sie gleichzeitig SHIFT und "COMMODORE", um 
Kleinbuchstaben zu bekommen. 


2 Bringen Sie den Cursor mit Hilfe der CRSR-Tasten zur 
Zeile 30 und positionieren Sie ihn rechts vom ersten 
Anführungszeichen. 


3% Drücken Sie die SHIFT- und die INST/DEL-Taste und 
schaffen Sie damit genügend Platz, um " und Frauen" 
einfügen zu können. 


4. Um den Satz zu korrigieren, plazieren Sie den Cursor 
über das "j" in "jetzt" der Zeile 20, und drücken Sie 
SHIFT und "J", damit Sie als erstes Zeichen des Satzes 
einen Großbuchstaben haben. (Das gleiche machen Sie mit 
den Wörtern "zeit", "männer" und "land".) 


Nach diesen Reparaturen haben Sie nun Groß- und Kleinbuchstaben. 
Wenn Sie jetzt RUN eingeben, sollten Sie lesen können: 


Jetzt ist Zeit für alle guten Männer und Frauen zu kommen, 
um ihr Land zu schützen. 
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Sie ersparen sich viel Zeit und Ärger, wenn Sie mit dem Editor 
arbeiten, anstatt alle Fehler einzeln auszubessern. Als prakti- 
sche Übung sehen Sie nachfolgend ein paar zu verbessernde Zeilen. 
Die erste der beiden gleichen Zeilen ist die falsch eingegebene, 
die zweite die korrekte Zeile. Da Kleinigkeiten einen großen Un- 
terschied ausmachen, sind dort mehrere Änderungen auszuführen. 
Sie werden sehen, daß Sie gerade auf diese kleinen Fehler am häu- 
figsten hereinfallen werden. Üben Sie diese Beispiele, bis Sie 
sich im Editieren sicher fühlen - Zeit, die Sie jetzt investie- 
ren, sparen Sie später. 


Editierbeispiele 


50 PRINT SEIN ODER NICHT SEIN." 

50 PRINT "SEIN ODER NICHT SEIN." 

10 PRINT <CLR/HOME> 

10 PRINT "<CLR/HOME>" 

80 PRINT "EIN GUTER MANN IST SCHWER ZU FINDEN" 
80 PRINT "EINE GUTE KRAFT IST SCHWER ZU FINDEN" 
40 PRINT "<CLR/HOME>" PRINT "WIR SIND FERTIG! 
40 PRINT "<CLR/HOME>":PRINT "WIR SIND FERTIG!" 


Wenn Sie diese Zeilen ausgebessert haben, können Sie jede Zeile 
editieren. Wenn Sie erst mal den Bogen raus haben, ist es ganz 
einfach. 


2.5 Grundlegende mathematische Operationen 


Bis jetzt haben wir nur Text ausgedruckt, was sich nicht sehr von 
der Arbeit mit einer guten Schreibmaschine unterschieden hat. 
Lassen Sie uns nun ein paar einfache mathematische Rechenopera- 
tionen durchführen, um Ihnen zu zeigen, wie Ihr Computer rechnet. 
Geben Sie folgendes ein: 


<CLR/HOME> 
PRINT 2+2 


Ihr Bildschirm sollte jetzt so aussehen: 
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PRINT 2+2 
4 


Großartig: der Computer kann addieren - aber das kann auch ein 
10-DM-Taschenrechner und ein 7 Jahre altes Kind. Wer sagte denn, 
Computer seien clever? Der Programmierer ist derjenige, der cle- 
ver ist. Also, versuchen wir ein etwas umfangreicheres Beispiel. 


<CLR/HOME> 
PRINT 7.87%123.65 


Auch das kann Ihr Taschenrechner noch genau so, jedoch ein sie- 
benjähriges Kind hätte schon einige Arbeit damit. 


Je weiter wir fortschreiten, desto mehr Aspekte mathematischer 
Probleme können wir einfügen. Im nächsten Kapitel sehen Sie, wie 
Werte in Variablen hinterlegt werden und noch andere Dinge, die 
Ihren Taschenrechner schocken würden. Im Augenblick jedoch sehen 
wir uns erst das Format von mathematischen Operation an. Das "+" 
und "-" funktionieren genauso wie in der "normalen" Mathematik. 
Das "x" wird für Multiplikationen durch den "*"(Stern), und der 
"__" wird für die Division durch den "/"(Schrägstrich) ersetzt. 


Wenn wir anfangen, komplexere mathematische Berechnungen durchzu- 
führen, wird es nötig sein, uns eine wichtige Regel zur Lösung 
der Probleme anzusehen. Diese wird "Vorgehensweise" genannt. Ab- 
hängig von den Operationen, die wir durchführen, und dem Ergeb- 
nis, das wir erhalten möchten, benutzen wir die eine oder die 
andere Regel. Stellen Sie sich z.B. vor, Sie möchten die Summe 
zweier Zahlen mit einer dritten multiplizieren - die Summe von 15 
und 20, multipliziert mit 3. Wenn Sie dies so eingeben, 


3* 15 + 20 


erhalten Sie 3 multipliziert mit 15 und addieren dazu 20. Aber 
das wollten Sie nicht. Es ist durch die gegebene Vorgehensweise 
passiert - Multiplikationen haben Vorrang vor Additionen. Um sich 
an diese Regelung zu erinnern, können Sie das folgende kleine 
Programm eingeben, es ablaufen lassen und dann im Kommandomodus 
einige mathematische Operationen eingeben. Die Ergebnisse können 
Sie dann anhand des "Vorgehensplanes" am Bildschirm kontrollie- 
ren. (Dieses kleine Programm ist sehr nützlich. Sichern Sie es 
deshalb auf Diskette oder Band.) 
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10 PRINT "<CLR/HOME>" 

20 PRINT "1.- (MINUSZEICHEN FÜR NEGATIVE ZAHLEN - KEINE 
SUBTRAKTION) " 

30 PRINT "2. (EXPONENT)" 

40 PRINT "3.*/(MULTIPLIKATION UND DIVISION)" 

50 PRINT "4.+ -(ADDITION UND SUBTRAKTION)" 

60 PRINT "ALLE ANDEREN WERDEN GLEICHRANGIG BEHANDELT " 
70 PRINT "VORGEHENSWEISE IST VON LINKS NACH RECHTS " 
80 PRINT "IHR COMPUTER LÖST ZUERST DIE KLAMMERAUS-" 

90 PRINT "DRÜCKE, BEI GESCHACHTELTEN KLAMMERN, VON " 
100 PRINT "INNEN NACH AUSSEN, AUF UND MULTIPLIZIERT " 
110 PRINT "DIE AUFGELÖSTEN KLAMMERAUSDRÜCKE DANN." 


Probieren Sie ein paar kompliziertere Rechenoperationen, und se- 
hen Sie nach, ob Sie das gewünschte Ergebnis erhalten. 


Änderung der Prioritäten 


Wenn Sie die Regel herausgefunden haben, nach der mathematische 
Operationen ablaufen, sehen Sie sich an, wie diese mathematischen 
Probleme sehr einfach organisiert werden. Durch EINKLAMMERN von 
zwei oder mehreren Zahlen haben Sie die Möglichkeit, die Priori- 
tät heraufzusetzen. Lassen Sie uns zu unserem Beispiel von vorne 
zurückkehren und die Multiplikation der Summe diesmal mit Klanm- 
mern durchführen. 


PRINT 3 * (15 + 20) 


Als das Multiplikationszeichen noch Vorrang vor dem Additionszei- 
chen hatte, erhielten wir als Ergebnis 3 mal 15, plus 20. Da 
jetzt die Operation innerhalb der Klammern zuerst durchgeführt 
wird, addiert Ihr Computer ZUERST 15 und 20, und multipliziert 
diese Summe dann mit 3. Wenn in einem Ausdruck mehr als ein Klam- 
mernpaar ist, löst er die innerste zuerst auf und arbeitet sich 
nach außen durch. 
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Das Klammern-Gefängnis 


Um Ihnen zu helfen, sich die Regelung mit den eingeklammer- 
ten mathematischen Operationen zu merken, denken Sie dabei 
an ein mehrstöckiges Gefängnis. Jede Zelle repräsentiert 
einen Klammerausdruck, der von links nach rechts aufgelöst 
wird. Jede Operation ist ein "Gefangener", umgeben von Wän- 


den aus Klammern. Um aus diesem Gefängnis auszubrechen, muß 
der Gefangene erst einmal aus seiner Zelle kommen. Dann 
geht der Gefangene nach rechts und befreit alle anderen Ge- 
fangenen aus ihren Zellen. Als nächstes brechen diese aus 
dem "Zellenblock" aus und schließlich in die Freiheit. Füh- 
ren Sie einige Beispiele durch. Vielleicht fällt Ihnen auch 
noch ein besserer Vergleich ein. 





Die folgenden Beispiele zeigen Ihnen einige Operationen mit Klam- 
mern. 


PRINT 20 + 10 * (8 - 4) 

PRINT (12.43 + 92) /3* (11 - 3) 
PRINT 22 * 3.1415 * 22 * 3.1415 
PRINT (9 + 3) / (15 -5) 

PRINT - 10/2 * ((12 + 7) + (8 - 4)) 


Versuchen Sie nun einige der Probleme in einem geeigneten Format 
mit Ihrem Computer zu lösen: 


Multiplizieren Sie die Summe von 4,9 und 20 mit 15 


Multiplizieren Sie 35 mit 35 und das Ergebnis mit Pi(SHIFT 
*). Die vertikale Pfeiltaste/Pi befindet sich zwischen dem 
Stern und der RESTORE-Taste. (Sie wissen, daß die Formel den 
Kreisinhalt mit einem Radius von 35 berechnet. Um den Inhalt 
eines anderen Kreises zu berechnen, tauschen Sie nur den 
Wert 35 aus.) Pi (SHIFT *) wird genau wie eine andere ein- 
gegebene Zahl behandelt, aber um Zeit zu sparen, benutzen 
Sie diese vorbelegte Taste. Ganz gut, was? 


Addieren Sie die Beträge für Ihre Ferngespäche und dividie- 
ren Sie die Summe durch die Anzahl der getätigten Anrufe. 
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Sie erhalten damit die durchschnittlichen Kosten Ihrer Tele- 
fongespräche. Erinnern Sie sich, daß sie diese Berechnung in 
einer einzigen Anweisung durchführen können. Machen Sie das 
gleiche mit Ihrem Scheckheft, um die durchschnittlichen Aus- 
gaben pro Scheck zu errechnen. 


2.6 Zusammenfassung 


Dieses Kapitel hat die meisten grundlegenden Aspekte des Program- 
mierens dargestellt. Sie sollen nun in der Lage sein, Ihren COM- 
MODORE-64-Editor zu handhaben und Kommandos im Kommandomodus und 
im Programmodus zu schreiben. Sie sollten auch mathematische Ope- 
rationen manipulieren können. Wie auch immmer, Sie haben gerade 
erst begonnen, die Macht Ihres Computers zu entdecken und be- 
handeln ihn deshalb im Augenblick noch eher wie einen hervorra- 
genden Rechner anstatt wie einen Computer. Nichtsdestoweniger 
ist das, was wir in diesem Kapitel gelernt haben, als Grundstein 
für Ihr späteres Programmierverständnis zu sehen. Wenn es im Mo- 
ment noch einiges gibt, was Sie nicht ganz verstehen, blättern 
Sie bitte die letzten Seiten dieses Kapitels nochmal durch, bevor 
Sie weiterarbeiten. Falls Sie nach einer Wiederholung immer noch 
kleine Schwierigkeiten haben sollten, geben Sie nicht auf. Sie 
werden diese später überwinden. Es ist aber wichtig, daß Sie beim 
Durcharbeiten der Abschnitte alle vorgegebenen Übungen ausprobie- 
ren. 


Das nächste Kapitel zeigt uns den Bereich der Computerprogrammie- 
rung und vertieft wesentlich Ihr Verständnis für den COMMODORE- 
64. Wenn Sie schrittweise vorgehen, werden Sie über die "Kraft in 
Ihren Fingerspitzen" erstaunt sein und sehen, wie einfach Pro- 
grammieren ist. Wir verlassen jetzt auch den Bereich der "Ta- 
schenrechner"-Kommandos und sehen uns die tatsächliche Arbeit des 
Computers an. Dies ist der Moment, in dem der Spaß beginnt. 
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Einführung 


Im letzten Kapitel zeigten wir Ihnen die Ausführung einiger Kom- 
mandos im Kommando- und Programmodus. Von nun an konzentrieren 
wir uns auf den Ausbau der Grundkenntnisse im Programmodus aus 
Kapitel 2 und versuchen verschiedene Kommandos in einem Programm 
zusammenzufassen. Den Kommandomodus benutzen wir dazu, Ihnen ein- 
fache Beispiele und die Arbeitsweise einzelner Kommandos zu zei- 
gen. Noch ein Tip: da wir ab jetzt laufend mehr Kommandos lernen, 
wäre es gut, die kleinen Beispiele auf Diskette oder Band abzu- 
speichern, da dies für einen Rückblick und ein schnelles Auffin- 
den von Beispielen nützlich ist. Wählen Sie dafür Dateinamen, die 
Sie an den Inhalt erinnern, wie z.B. Variablenbeispiel oder Un- 
terroutinentechnik und denken Sie daran, daß jede Datei einen 
eigenen Namen braucht. Sie können Dateinamen auch durchnumerieren 
(z.B. Tabellei, Tabelle2, usw.). 


3.1 Variablen 


In den variablen Kommandos liegt wahrscheinlich die wichtigste 
aller Computerfunktionen. Grundsätzlich ist eine Variable ein 
Symbol, das mehr als einen einzigen Wert beinhalten kann. Wenn 
wir z.B. sagen x = 10, weisen wir der Variablen "X" den Wert 10 
zu. Probieren Sie folgendes: 


X = 10<RETURN> 
READY. 
PRINT X<RETURN> 
Ihr Computer antwortet: 
10 
Jetzt tippen Sie: 
X = 55.7<RETURN> 


READY. 
PRINT X<RETURN> 
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und Sie erhalten jetzt: 
5547 


Bei jeder neuer Wertzuweisung sehen Sie nach der PRINT-Anweisung 
den zuletzt zugewiesenen Wert der Variablen. Geben Sie folgendes 
Beispiel ein: 


X 10<RETURN> 
Y = 15<RETURN> 
PRINT X + Y<RETURN> 


Ihr COMMODORE-64 antwortet mit: 
25. 


Wie Sie sehen, können Sie Variablen auch für mathematische Pro- 
bleme benutzen. Sie setzen die Variablen direkt, anstelle der 
Zahlen, ein. Lassen Sie uns im nachfolgenden kleinen Beispiel 
Variablen benutzen, um den Inhalt eines Kreises zu berechnen. 


10 PRINT "<CLR/HOME>" 

20 PI = (SHIFT) * :REM BENUTZEN SIE DIE "PI" TASTE LINKS 
NEBEN DER RESTORE TASTE 

30 R = 15:REM R IST DER RADIUS DES KREISES 

40 PRINT PI * (R*R):REM DIES GIBT UNS PI MAL DIE FLÄCHE DES 
RADIUS 

50 END 


Wenn Sie RUN eingeben, erhalten Sie die Fläche eines Kreises mit 
dem Radius 15. Ändern Sie nun den Wert der Variablen "R" in Zeile 
30, können Sie problemlos die Fläche jedes gewünschten Kreises 
berechnen. Da in unserem Beispiel eine Zahl quadriert wird, kön- 
nen wir auch unser Zeichen für den Exponenten "*" benutzen. Än- 
dern Sie Zeile 40 so: 


40 PRINT PI * (R * 2):REM DIE GLEICHE TASTE WIE BEI PI ABER 
OHNE SHIFT TASTE 


Lassen Sie das Programm noch einmal ablaufen und kontrollieren 
Sie, ob Sie das gleiche Ergebnis wie vorher haben. Verändern Sie 


auch den Wert von R und berechnen Sie damit verschiedene Kreis- 
inhalte. 


64 


wir machen weiter 


Variablennamen 


Wenn Sie einer Variablen einen Namen geben, beachtet der Computer 
nur die ersten beiden Zeichen. Nennen Sie z.B. eine Variable NUM- 
MER, ist Ihr Computer nur an den Buchstaben NU interessiert. 
Testen Sie folgendes: 


NUMMER = 63 
PRINT NU 


Sie erhalten 63, auch wenn Sie nur die ersten 2 Buchstaben der 
Variablen NUMMER eingegeben haben. Probieren Sie noch ein Bei- 
spiel: 


NUMMER = 123 
PRINT NUSS 


Der Wert 123 wird ausgegeben, da immer noch nur die ersten zwei 
Buchstaben für den Computer interessant sind. So erhalten Sie den 
Wert 123, auch wenn die Namen der Variablen hinter den zwei 
ersten Buchstaben unterschiedlich sind. 
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Am sinnvollsten scheint es, nur Variablen mit zwei Buchstaben zu 
verwenden. Wenn Sie in der Benutzung von Variablen geübter sind, 
ist das sicher eine gute Idee. Bei umfangreicheren Programmen ist 
es sehr nützlich, sprechende Variablennamen zu vergeben. Im fol- 
genden Programm wird z.B. MITTEL als beschreibender Variablenname 
festgelegt: 


10 PRINT "<CLR/HOME>" 

20 A= 15: B= 23: C = 38 
30 MITTEL = (A+B +C) / 3 
40 PRINT MITTEL 


50 END 


Wäre dieses Programm hundert oder mehr Zeilen lang, wüßten Sie 
auch dann noch, wozu die Varable dient - sie errechnet einen 
"MITTEL"-Wert. Jetzt müssen Sie aber darauf achten, daß Sie nicht 
eine zweite Variable mit dem Namen MINDEST oder einem ähnlichen 
mit MI beginnenden Namen versehen. 


Benutzen Sie zur Benennung der Variablen keine "reservierten Wör- 
ter" (z.B. Programmierkommandos) oder reservierte Variablen und 
achten Sie darauf, daß die erste Stelle ein Buchstabe ist. Es 
gibt nur die folgenden 3 reservierten Variablen: TI,TI$ und ST. 
Lassen Sie uns folgendes Beispiel durchgehen und sehen, was ein 
richtiger oder falscher Variablenname ist: 


PRINT = 987 (Falsch, da PRINT ein reserviertes Wort ist.) 


Ri = 321 (Gültiger Name, da erste Stelle ein Buchstabe.) 
IR = 55 (Falsch, da das erste Zeichen kein Buchstabe ist.) 
FORT = 222 (Falsch, da der Variablenname das reservierte 


Wort FOR beinhaltet.) 
PR = 99 (Gültig, auch wenn das reservierte Wort PRINT 
ebenfalls mit PR beginnt; es wird nur ein Teil des 


reservierten Wortes im Variablennamen verwendet.) 


TO = 983 (Falsch, da TO ein reserviertes Wort mit diesen 
zwei Buchstaben ist.) 
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TI = 99999999 (Falsch, da TI eine reservierte Variable für 
die Zeitausgabe darstellt.) 


ADFEUDNDHFUFJCJKJDF = 10 (Gültiger Name, aber sinnlos.) 


Es ist auch möglich, Werte an Variablen zu übergeben, indem man 
andere Variablen oder Variablenkombinationen und Zahlen nimmt. In 
unserem Beispiel mit der Variablen MITTEL definierten wir diese 
mit Hilfe anderer Variablen. Hier sind weitere Beispiele: 


T=A* (B+cC) 
N=N +1 
SUM=-X+Y+72Z 


Variablentypen 


Variablen mit einfacher Genauigkeit 


Bisher haben wir in unseren Beispielen nur "Fließkomma"-Variablen 
benutzt. Jede Variable, die mit einem Buchstaben beginnt und 
nicht mit einem Dollarzeichen ($) oder einem Prozentzeichen (%) 
endet, ist eine Variable mit einfacher Genauigkeit. Der Wert für 
eine Variable mit einfacher Genauigkeit kann zwischen + oder - 
2.938735886-39 und + oder -1.70141183E+38 liegen. Das "E" steht 
für die Exponentialdarstellung für sehr große Zahlen. Machen Sie 
sich darüber im Moment noch keine Gedanken. Fragen Sie jedoch ei- 
nen Mathematiker, wenn Sie ein Ergebnis mit diesem Buchstaben in 
einem numerischen Resultat erhalten. Stellen Sie sich im Moment 
nur vor, daß Sıe Zahlen in ihrem Standardformat von 0,01 bis 
999.999.999 eingeben können. (Wenn Ihr Konto oder Ihre Einkom- 
menssteuererklärung dieses wissenschaftliche Zeichen "E" ent- 
halten, verlassen Sie besser das Land.) Denken Sie bei Variablen 
mit einfacher Genauigkeit nur daran, daß sie alle gebräuchlichen 
Zahlen, zusammen mit Dezimalstellen aufnehmen können. 
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Integer-Variablen 


Integer-Variablen enthalten nur "Ganzzahlen" - d.h. Zahlen ohne 
Kommastellen. Sie sehen im folgenden einige Beispiele: 


AB% = 345 

K% = R% + N% 

ADD% = ADD% + NUM% 
WXY% = 88 + LR% 


Die Werte für Integer-Variablen haben einen Bereich von -32767 
bis +32767. Wie bei den Variablen mit einfacher Genauigkeit, wer- 
den nur die ersten zwei Buchstaben gelesen. Das "%"-Zeichen wird 
aber immer gelesen, unabhängig davon, wie viele Buchstaben davor 
stehen. So ist eine Variable mit dem Namen WA% dieselbe Variable 
wie WAX%. Jedoch eine Variable mit dem Namen ABC ist verschieden 
von der Variablen mit dem Namen ABC%; so können beide Variablen 
als einmalig angesehen und im gleichen Programm verwendet werden. 
Da sie aber einen kleineren Bereich als die Variablen mit einfa- 
cher Genauigkeit abdecken, haben Integer-Variablen ein begrenztes 
Anwendungsgebiet. Integer-Variablen brauchen jedoch weniger Spei- 
cherplatz und sind schneller in der Ausführung als Variablen mit 
einfacher Genauigkeit. Daher haben sie viele nützliche Anwen- 
dungsbereiche. Sie können genau wie Variablen mit einfacher Ge- 
nauigkeit in mathematischen Operationen verwendet werden. Da sie 
aber keine Dezimalstellen mitabspeichern, sind sie bei Operatio- 
nen, die Kommastellen erzeugen (z.B. die Division), mit Vorsicht 
einzusetzen. Probieren Sie einige der folgenden Operationen im 
Kommandomodus, um zu sehen, wie diese funktionieren: 


A% = 15: B%$ = 21: C% = B% + A%: PRINT C%<RETURN> 


36 

LL% = 17: JJ% = LL% / 5: PRINT JJ%<RETURN> 
3 

2% = -11: XY% = 2% + 51: PRINT XY%<RETURN> 
40 
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String-Variablen 


Stringvariablen sind bei der Formatierung der Ausgaben auf dem 
Bildschirm sehr nützlich. Genau wie Integer-Variablen und Variab- 
len mit einfacher Genauigkeit werden sie durch das PRINT-Kommando 
auf dem Monitor angezeigt. Mit Stringvariablen können jedoch 
nicht nur Zahlen, sondern alle Zeichen, genannt "Strings" (Tex- 
te), ausgegeben werden. Stringvariablen werden durch ein Dollar- 
zeichen ($) am Ende des Variablennamens gekennzeichnet. So sind 
z.B. AS, BAD$, GS$ UND PULL$S gültige Stringvariablen. (In der 
Computersprache verwenden wir den Ausdruck "String" anstelle des 
Dollarzeichens. So nennen wir unsere Beispiele "A String", "BAD 
String", usw.) Stringvariablen definiert man durch Einschließen 
des "Strings" in Anführungszeichen, genau wie bei unseren Texten, 
die wir mit PRINT ausgeben. 


Lassen Sie uns einige Beispiele im Kommandomodus probieren: 


ABCS "ABC": PRINT ABC$S<RETURN> 

GS$ = "POSSE": PRINT GS$S<RETURN> 

KAT$ = "KATZE": PRINT KAT$S<RETURN> 

NUMMERS = "123456789": PRINT NUMMERS<RETURN> 
BIS = "5 + 10 + 20": PRINT B1$<RETURN> 


Genau wie Integer-Variablen und Variablen mit einfacher Genauig- 
keit, benutzen die Stringvariablen nur die ersten beiden Stellen. 
Sie müssen daher mit einem Buchstaben beginnen und dürfen keine 
reservierten Wörter sein. Wie Sie in unserem Beispiel bemerkt 
haben, werden Zahlen in Stringvariablen nicht wie Zahlen, sondern 
als "Worte" oder "Nachrichten" behandelt. Bei der Ausgabe von BIS 
erhielten Sie nicht "35" (die Summe von 5 + 10 + 20), sondern ge- 
nau die Eingabe in Anführungszeichen: 5 + 10 + 20. Verwenden Sie 
Strings also nicht in der Mathematik. (In späteren Kapiteln wer- 
den wir einige Tricks zeigen, wie Sie Stringvariablen in Integer- 
Variablen oder numerische Variablen mit einfacher Genauigkeit 
umwandeln können. Im Moment betrachten Sie diese noch als Texte.) 


Mit dem angesammelten Wissen schreiben wir jetzt ein Programm, 
welches Variablen beinhaltet. Das kleine Programm erlaubt Ihnen, 
die Ausgaben eines Schecks vom Guthaben zu subtrahieren und das 
neue Guthaben auszugeben. Dieses Programm wird später weiter aus- 
gebaut, so daß Sie die Möglichkeit erhalten, damit Ihr Haus- 
haltskonto zu führen. 
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10 PRINT "<CLR/HOME>" 

20 BALANCE = 571.88:REM JEDER ANDERE WERT IST MÖGLICH. 
BALANCE(BA) IST EINE VARIABLE MIT EINFACHER GENAUIGKEIT 

30 SCHECK = 29.95:REM IHRE LETZTE AUSGABE IM COMPUTERLADEN. 
SCHECK(SC) IST EINE VARIABLE MIT EINFACHER GENAUIGKEIT. 


40 B$S = "IHRE ANFANGSBILANZ = DM " 
50 C$ = "IHR SCHECK = DM " 
60 NBS = "IHRE NEUE BILANZ = DM ":REM B$,C$ UND NBS$S 


SIND STRINGVARIABLEN 

70 PRINT BS; BALANCE 

80 PRINT C$,. SCHECK 

90 N = BALANCE - SCHECK 
100 PRINT NBSJ N 

110 END 


Da dies ein sehr langes Programm ist, vergewissern Sie sich, ob 
Sie alles richtig eingegeben haben. Ihr Computer ist sehr kri- 
tisch, wenn Sie Komma, Semikolon und Punkt verwechseln. Sichern 
Sie das Programm auch auf Diskette. Um damit zu spielen, verän- 
dern Sie die Werte in Zeile 20 und 30. 


Lassen Sie uns kurz wiederholen, was wir gemacht haben: 


1. Als erstes haben wir die Variablen mit einfacher Genau- 
igkeit mit den Namen "BALANCE" und "SCHECK" definiert, 
welche Ihr Computer als BA und SC liest (nur die ersten 
zwei Buchstaben). 


2. Dann haben wir die Stringvariablen B$S, C$ und NB$, 
die wir als Label zur "Bildschirmformatierung" benut- 
zen, definiert. 


3% Schließlich haben wir alle unsere Informationen mit 
Hilfe unserer Variablen und der neuen Variable "N", die 
wir für die Differenz zwischen BALANCE und SCHECK defi- 
niert hatten, ausgegeben. 
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Beachten Sie bitte, wie wir den "OUTPUT" (Bildschirmausgabe) mit 
unseren PRINT-Anweisungen formatiert haben. Das Semikolon ";" 
zwischen den Variablen bewirkt folgendes: Erstens teilt es dem 
Computer das Ende der einen und den Anfang der nächsten Variablen 
mit, und zweitens erteilt es dem Computer die Anweisung, die 
zweite Variable direkt hinter der ersten auszugeben. Genauer 
gesagt, nimmt es die Stringvariable NB$ 


IHRE NEUE BILANZ = DM# 


und gibt den Wert der Variablen mit einfacher Genauigkeit N hin- 
ter dem DM-Zeichen aus (genau auf die Stelle, die wir mit dem #- 
Zeichen gekennzeichnet haben). Später werden wir uns noch ein- 
gehender mit der Formatierung von Texten beschäftigen. Vorher se- 
hen wir uns aber noch die Interpunktion bei der Textdarstellung 
an. Wir benutzen das Komma ",", das Semicolon ";" und den "Zei- 
lenvorschub", um einfache Textdarstellung zu zeigen. Geben Sie 
das folgende kleine Programm ein: 
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NEW<RETURN> 

10 PRINT "<CLR/HOME>" 

20 AS = "HIER": B$S = "DORT": C$ = "WO" 

30 PRINT AS$;: PRINT B$;: PRINT C$;:REM SEMICOLONS 

35 PRINT 

40 PRINT AS$S,: PRINT B$,: PRINT C$,:REM KOMMAS 

45 PRINT:REM EIN ALLEINSTEHENDES PRINT ERGIBT EINE 
LEERZEILE 

>S0 PRINT A$: PRINT B$: PRINT C$:REM NEUE ZEILEN 

60 END 


Lassen Sie das Programm nun ablaufen. Wie Sie sehen, erreichen 
Sie mit den kleinen Unterschieden in Zeile 30, 40 und 50 große 
Unterschiede in der Ausgabe am Bildschirm. Im ersten Beispiel 
wird alles ohne Zwischenraum hintereinander ausgegeben, beim 
zweiten wird der Text gleichmäßig über den Bildschirm verteilt, 
und beim dritten Beispiel wird jeder String in einer neuen Zeile 
dargestellt. Wie Sie im obenstehenden Programm sahen, stellen 
Semikolons Zahlen oder Strings direkt hintereinander dar. Benut- 
zen wir hinter einer auszugebenden Variablen ein Komma, wird der 
Output in Vierergruppen über den Schirm verteilt. Verwenden wir 
dagegen Doppelpunkte oder neue Zeilennummern, erfolgt der Output 
in einer neuen Zeile. Eine PRINT-Anweisung für sich allein fügt 
ein vertikales "Line feed" (Zeilenvorschub) an. Probieren Sie 
folgendes Programm, um zu sehen, wie alleinstehende PRINTs ver- 
wendet werden können. 


NEW<RETURN> 

10 PRINT "<CLR/HOME>" 

20 PRINT "IMMER, WENN SIE EINE ALLEINIGE PRINT ANWEISUNG"; 
:REM BEACHTEN SIE DIE STELLE DES SEMICOLONS 

30 PRINT " EINGEBEN, BEWIRKT DIES EINEN ZEILENVORSCHUB. " 
40 PRINT 

50 PRINT "SEHEN SIE WAS GEMEINT IST?" 

60 END 


Spielen Sie mit Kommas, Semikolon und Zeilenvorschub und verwen- 
den Sie Variablen und Stringvariablen, bis Sie sich ganz sicher 
sind. Sie sind sehr wichtig und - falsch eingesetzt - oft die 
Ursache von Programmfehlern. 
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Hat Ihr Programm 





BUGS und Abstürze 


Unter Programmierern tauchen oft die Ausdrücke "Debugging" 
und "Absturz" im Gespräch auf. "BUGS" sind Fehler in Pro- 
grammen, die entweder einen ?SYNTAX ERROR erzeugen oder 
verhindern, daß Ihr Programm das macht, was Sie wollten. 
"Debugging" nennt man den Prozeß der Fehlerentfernung. Ein 
"Absturz" ist das, was Ihr Programm macht, wenn es auf ei- 
nen Fehler stößt. Das ist Computersprache; wenn Sie die 
Ausdrücke in einer Unterhaltung gebrauchen, denken die Leu- 


te entweder, Sie wissen eine Menge über Computer oder Sie 
haben einen "Bug" in Ihrer Persönlichkeit. 





Ist Ihr Programm abgestürzt? 
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3.2 Input und Output (I/O) 


Input und Output, oft als I/O bezeichnet, ist die Eingabe von In- 
formationen in den Computer und ihre Ausgabe. Gewöhnlich geben 
wir Informationen über die Tastatur ein, sichern sie auf Diskette 
oder Band und lesen die Informationen später von dort wieder ein. 
Die Ausgabe von Informationen erreichen wir über Bildschirm oder 
Drucker. Diese Vorgänge bezeichnet man als I/O. Bisher haben wir 
Informationen über die Tastatur eingegeben, entweder im Kommando- 
oder im Programmodus. Mit Hilfe der PRINT-Anweisung haben wir die 
Informationen auf den Monitor ausgegeben. Es gibt auch noch an- 
dere Wege, Informationen einzugeben, z.B. mit einer Kombination 
von Programm und Eingabekommandos. Lassen Sie uns einige dieser 
Wege betrachten, um unser SCHECKBUCH-Programm handlicher zu ma- 
chen. 


INPUT 


Das INPUT-Kommando ist Bestandteil eines Programms. Es erwartet 
eine Eingabe von der Tastatur mit einem abschließenden <RETURN>. 
(Ein RETURN allein ist auch erlaubt, aber die Antwort wird dann 
als Leerstring interpretiert.) Das INPUT-Kommando kann daher im 
Kommandomodus nicht verwendet werden. (Nach Ausführung im Komman- 
domodus erhalten Sie die Fehlermeldung: ?ILLEGAL DIRECT ERROR.) 
Sehen wir uns ein einfaches Beispiel an: 


NEW<RETURN> 

10 PRINT "<CLR/HOME>" 

20 INPUT X:REM X IST EINE NUMERISCHE VARIABLE - GEBEN SIE 
DESHALB EINE NUMMER EIN 

30 PRINT X 

40 END 


Wenn Sie RUN eingeben, sehen Sie einen leeren Bildschirm mit 
einem "?" und dem blinkenden Cursor dahinter, bis Sie eine Nummer 
eingeben. Anschließend gibt der Computer die gerade eingetippte 
Nummer aus. Wirklich interessant, wie? 


Lassen Sie uns die gleiche Information mit unterschiedlichem 
Format ausprobieren. Das Schöne an der INPUT-Anweisung ist, daß 
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Sie wie bei der PRINT-Anweisung Texte auf dem Bildschirm ausgeben 
können. Sehen Sie sich das folgende Programm an: 


NEW<RETURN> 
10V ZELR/HOME>" 

20V "GEBEN SIE IHR ALTER EIN";X 

30 PRINT "<CLR/HOME>" :PRINT:PRINT:PRINT 
40 PRINT "IHR ALTER IST ";X 


Geben Sie RUN ein. Sie sehen, daß die Darstellung ein bißchen in- 
teressanter ist. Beachten Sie auch, daß wir kein END-Kommando am 
Ende des Programms haben. Beim COMMODORE-64 ist es nicht erfor- 
derlich, eine END-Anweisung zu schreiben, aber grundsätzlich eine 
gute Idee. Wenn Sie anspruchsvolle Programme schreiben, sehen 
Sie, daß Sie innerhalb des Programms springen können und Ihre 
END-Anweisung dann mitten im Programm steht. Hier brauchen Sie 
die END-Anweisung, um ein klares Programmende festzulegen. Wäh- 
rend wir das END-Kommando zwar im Augenblick nicht brauchen, ist 
es doch eine gute Angewohnheit, die man sich aneignen sollte. 


Lassen Sie uns bei den INPUT-Anweisungen weitermachen. 









IT I ee —— 
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NEW<RETURN> 
10 PRINT "<CLR/HOME>" 

20 INPUT "GEBEN SIE IHREN NAMEN EIN --> ";NAS 

30 PRINT 

40 INPUT "GEBEN SIE IHR ALTER EIN --> ";AG% 

50 PRINT | 

60 INPUT "DRÜCKEN SIE <RETURN> UM FORTZUSETZEN";RTS 

70 ? "<SCLR/HOME>":2:?:?:?:?:REM BENUTZEN SIE DIESE 
ABKÜRZUNG FÜR PRINT 

80 PRINT NA$;" IST ";AG%;" JAHRE ALT.":REM PRÜFEN SIE 
GENAU DIE LAGE DER ANFÜHRUNGSZEICHEN UND DER DOPPELPUNKTE 
IN DIESER ZEILE 

90 END 


Inzwischen sind wir soweit, daß Sie Informationen in Form von 
numerischen oder Stringvariablen eingeben können und wissen, wie 
Sie den Output gestalten. Wenn Ihre Programme länger und kompli- 
zierter werden, ist es wichtig, Ihre Stringvariablen und numeri- 
schen Variablen so zu verbinden, daß gut ersichtlich ist, was die 
Zahlen auf Ihrem Bildschirm bedeuten. Ein Computer, der den Bild- 
schirm nur mit Zahlen füllt und bei dem Sie nicht wissen, was das 
bedeutet, wäre nicht sehr hilfreich. Zeile 60 hat das Format für 
eine Pause in Ihrem Programm. RT$ beinhaltet keine Informationen, 
bis Sie über die Tastatur etwas eingeben und RETURN drücken. 


Informationen mit GET 


Die GET-Anweisung ist ähnlich wie die INPUT-Anweisung. Sie wird 
ausgeführt, sobald Sie eine Taste drücken. Um zu sehen, wie Sie 
funktioniert, probieren Sie folgendes Programm. Beachten Sie, daß 
GET innerhalb einer Programmschleife liegt. 


NEW<RETURN> 
10 PRINT "<CLR/HOME>" 


30 PRINT "GEBEN SIE EINE NUMMER VON 1 - 9 EIN "; 
35 GET N:IF N< 1 OR N > 9 THEN 35:REM BEACHTEN SIE DAS 
FORMAT IN DIESER ZEILE 


40 ?:? 
50 PRINT "DRÜCKEN SIE EINE TASTE UM FORTZUSETZEN "; 
55 GET KS:IF KS = "" THEN 55:REM BENUTZT ALS PAUSE BIS EINE 


76 


Wir machen weiter 


TASTE GEDRÜCKT WIRD 

60 ? "<CLR/HOME>":?2:?2:?:? 

70 PRINT "IHRE NUMMER IST --> ";N 
80 END 


Beachten Sie, daß die GET-Anweisung ausgeführt wird, wenn Sie ei- 
ne Taste drücken. Bei einer INPUT-Anweisung geben Sie zuerst In- 
formationen ein und drücken dann die RETURN-Taste, bevor das Pro- 
gramm ausgeführt wird. Gut an der GET-Anweisung ist die schnel- 
lere Eingabe und Ausführung von der Tastatur aus. Das Problem 
liegt darin, daß Sie nur ein Zeichen eingeben können. Wenn Sie 
die falsche Taste drücken, haben Sie keine Chance, den Fehler zu 
berichtigen, wie es bei der INPUT-Anweisung möglich ist. 


Das Lesen von DATA-Zeilen 


Der dritte Weg, Daten in ein Programm einzugeben, erfolgt mit 
Hilfe der DATA- und READ-Anweisung. Anstatt Daten über die Tasta- 
tur einzugeben, werden Daten von einem Teil des Programms in ei- 
nen anderen eingelesen. Jede READ-Anweisung sucht nach Elementen 
in DATA-Anweisungen. Die READ-Anweisung ist mit einer Variablen 
verbunden, die in der nächsten DATA-Anweisung nachsieht und den 
numerischen Wert oder den String in der Variablen hinterlegt. 
Lassen Sie uns folgendes Beispiel ansehen: 


NEW<RETURN> 

10 PRINT "<CLR/HOME>" 

20 READ NAS:REM LIEST DEN NAMEN 

30 READ OCS:REM LIEST DIE BRANCHE 

40 READ STS:REM LIEST DIE STRASSE 

50 READ SN:REM LIEST DIE HAUSNUMMER 
60 READ PL:REM LIEST DIE POSTLEITZAHL 
70 READ WOS:REM LIEST DEN WOHNORT 

90 ?:?2:? 

100 REM BEGINN DER AUSGABE DER DURCH READ EINGELESEN WERTE. 
ACHTEN SIE AUF GENAUE EINGABE. 

110 PRINT NAS 

120 PRINT OCS 


130 PRINT ST$;" ";SN 
140 PRINT PL;" ";wo$ 
150 END 
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1000 DATA PETER SCHMITT, HARD- UND SOFTWARE, KAISERSTR., 18 
1010 DATA 8000, MÜNCHEN 21 


In der DATA-Anweisung sind die verschiedenen Elemente, durch Kom- 
ma getrennt, hinterlegt. Wenn Sie eines dieser Elemente entfernen 
oder ein Komma übergehen, kann einiges schieflaufen. Wenn eine 
READ-Anweisung z.B. eine numerische Variable (wie die PLZ) erwar- 
tet und einen String (wie z.B. Wohnort) einliest, erhalten Sie 
eine Fehlernachricht. Denken Sie bei der DATA-Anweisung an eine 
Reihe von Zahlen und Strings. Das erste Element der DATA Zeile 
wird entfernt, sobald das Programm an die READ-Anweisung kommt. 
Die nächste READ-Anweisung sucht nach dem obersten Element dieser 
Reihe, indem sie von links nach rechts vorgeht. Speichern Sie das 
Programm ab und lassen Sie uns anschließend einen Fehler einfü- 
gen. 


Listen Sie das Programm auf, und vergewissern Sie sich, daß Sie 
das Programm im Speicher haben, bevor Sie folgendes eingeben: 
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85 READ EXS$S 


Geben Sie jetzt RUN ein und Sie erhalten ?OUT OF DATA ERROR IN 
85. Der Fehler tritt auf, da Sie eine READ-Anweisung ohne ausrei- 
chende DATA-Anweisungen (oder Elemente) haben. Achten Sie deshalb 
darauf, daß erstens genügend Elemente in den DATA-Anweisungen für 
Ihre READ-Anweisungen vorhanden sind, und beachten Sie zweitens, 
daß die Variablen in Ihren READ-Anweisungen mit den Elementen der 
DATA-Anweisung übereinstimmen (z.B. lesen numerische Variablen 
die Zahlen und Stringvariablen die Strings.) Um Ihr Programm zu 
berichtigen, geben Sie folgendes ein: 


1020 DATA WORT 


Jetzt haben Sie wieder etwas für Ihre READ-Anweisung. (Natürlich 
können Sie auch die Zeile 85 wieder löschen.) 


Wenn ein Element einer DATA-Zeile in Anführungszeichen einge- 
schlossen ist, gehören alle eingeschlossenen Zeichen zu diesem 
String. Machen Sie z.B. folgende Änderung in Ihrem Programm, und 
geben Sie RUN ein: 


145 EXS 

1020 DATA "LEOPOLDSTR. 125,8000 MÜNCHEN 40, WEST-GERMANY" 
Beides, Nummern und Kommas, werden von der READ-Anweisung als 
Stringvariablen akzeptiert, weil sie in Anführungszeichen stehen. 
Entfernen Sie diese jetzt und geben Sie nochmals RUN ein. Sie 
erhalten nun nur den Wert bis zum ersten Komma (LEOPOLDSTR. 125), 
haben aber keine Probleme mit der Zahl 125, da diese als String 
behandelt wird. (Der Wert 125 kann aus diesem Grund nun nicht in 
mathematischen Berechnungen verwertet werden.) Experimentieren 
Sie mit unterschiedlichen Elementen, um zu sehen was passiert. 
Plazieren Sie die DATA-Zeile auch einmal an einen anderen Teil 
des Programms. Sie finden bald heraus, daß Sie nicht an einer be- 
stimmten Stelle im Programm stehen muß. 
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3.3 Schleifen mit FOR/NEXT 


Die FOR/NEXT-Schleife ist eine der nützlichsten Operationen in 
einem BASIC-Programm. Sie gibt dem Anwender die Möglichkeit, den 
Computer anzuweisen, eine festgelegte Anzahl an Anweisungen, mit 
einer variablen Schrittweite zu durchlaufen und auszuführen, bis 
das festgelegte Endekennzeichen erreicht wird. Lassen Sie uns ein 
einfaches Beispiel dazu ansehen. 


NEW<RETURN> 

10 PRINT "<CLR/HOME>" 

20 NAS = "<IHR NAME>" 

30 FOR I = 1 TO 10:REM BEGINN DER SCHLEIFE 
40 PRINT NAS 

50 NEXT I:REM ENDE DER SCHLEIFE 

60 END 


Geben Sie RUN ein. Sie sehen, daß Ihr Name 10 mal auf der linken 
Seite des Bildschirms angezeigt wird. Nun ja, nicht allzu ein- 
drucksvoll, aber wir werden sehen, wie nützlich dies bald sein 
wird. Als erstes betrachten wir noch ein anderes Beispiel und se- 
hen uns an, wie "I" nach dem Durchlaufen der Schleife aussieht. 


NEW<RETURN> 

10 PRINT "<CLR/HOME>" 
20 FOR I = 1 TO 10 

30 PRINT I 

40 NEXT I 


Wie Sie sehen, verändert sich der Wert von "I" während des Pro- 
grammlaufs bei jedem Betreten der Schleife. Denken Sie bei einer 
Schleife an ein Kind in einem Karussell. Nach jeder Runde erhält 
das Kind einen goldenen Ring, zuerst einen, und am Ende hat es in 
unserem Beispiel zehn. 


Da wir jetzt die Funktion der Schleife kennen, lassen Sie uns ei- 
ne weitere Übung durchführen. Wir verändern dazu unser abge- 
speichertes SCHECKBUCHPROGRAMM. Wir benutzen dafür mehrere Varia- 
blen, vergeben aber zuerst für die FOR/NEXT-Schleife traditionell 
die Variable "I". Als zweites brauchen wir eine Variable, um die 
Anzahl der Schleifendurchläufe festzulegen. Wir benutzen dazu N%, 
eine Integer-Variable. Drittens brauchen wir Variablen für den 
Saldo, die Höhe des Schecks und den neuen Saldo. Da das Programm 
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etwas länger wird, sichern Sie es zwischendurch ab, etwa alle 5 
Zeilen. Auf das Band sichern Sie immer nach 10 Zeilen. 


NEW<RETURN> 
10 PRINT "<CLR/HOME>" 

20 CB$ = "SCHECKBUCH" 

30 PRINT:PRINT:PRINT CBS$S 

40 INPUT "WIE VIELE SCHECKS? --> ";N% 

50 INPUT "WIE HOCH IST IHR GEGENWÄRTIGER SALDO? --> ";BA 

60 REM BEGINN DER SCHLEIFE 

70 FOR I = 1 TO N% 

80 PRINT "IHR SALDO IST JETZT DM ";BA 

90 PRINT "HÖHE DES SCHECKS #" ;1;"--> "; 

100 INPUT CK:REM VARIABLE FÜR DEN SCHECK 

110 BA = BA - CK:REM ENTHÄLT DEN LAUFENDEN SALDO 

120 NEXT I:REM ZUM ANFANG DER SCHLEIFE ; 

130 ? _ "<CLR/HOME>":REM LÖSCHT DEN SCHIRM WENN ALLE SCHECKS 
EINGEGEBEN SIND 

140 ?:?:? 

150 PRINT "SIE HABEN JETZT DM ";BA; "AUF IHREM KONTO" 

160 PRINT:PRIMT "DANKE UND KOMMEN SIE WIEDER" 

170 END 


Unser Scheckbuchprogramm wird jetzt schon einfacher im Gebrauch, 
worin der Vorteil des Computers liegt. Lassen Sie uns noch etwas 
anderes in Verbindung mit Schleifen betrachten. 


Eine Bagatelle 


Wenn Sie sich einige Programme ansehen, merken Sie, daß die 
Variable "I" häufig in Programmschleifen verwendet wird. 
Sie können dafür auch jede andere Variable nehmen, gewöhn- 
lich ist es jedoch "I". Ich war früher genau so neugierig 


wie Sie, warum Programmierer gerade den Buchstaben "I" aus- 
suchen. Nach anstrengender Suche habe ich es auch heraus- 
gefunden. Das "I" war in FORTRAN (einer der ersten Program- 
miersprachen) die "Integer"-Variable und wurde für "DO- 
Schleifen" benutzt, da das schneller ging. Das "I" kann 
auch als "I" in "increments" (Zunahme) interpretiert wer- 
den. Ich sagte Ihnen ja, daß es eine Bagatelle ist... 
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Geschachtelte Schleifen 


Bei manchen Anwendungen ist es erforderlich, eine weitere FOR/ 
NEXT-Schleife in die bereits vorhandene einzufügen. Betrachten 
wir eine einfache Anwendung. Stellen Sie sich vor, Sie haben zwei 
Teams mit jeweils 10 Mitgliedern. Sie möchten nun ein Teamver- 
zeichnis aufstellen und die Teamnummern (#1 oder #2) und Mit- 
gliedsnummern (#1 bis #10) vergeben. Mit einer geschachtelten 
Schleife erreichen Sie dies im folgenden Programm: 


NEW<RETURN> 
10 PRINT "<CLR/HOME>" 

20 FOR T = 1 TO 2:REM T FÜR TEAM# 

30 FOR M = 1 TO 10:REM M FÜR MITGLIEDS# 
40 PRINT "TEAM # ";T; "SPIELER # ";M 

50 NEXT M 

60 NEXT T 

70 END 
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In einer geschachtelten Schleife ist es sehr wichtig, die Reihen- 
folge zu beachten. Die innerste Schleife (in unserem Beispiel die 
"M-Schleife") darf keine weitere FOR- oder NEXT-Anweisung bein- 
halten. Denken Sie bei der geschachtelten Schleife an eine Reihe 
einander fressender Fische. Das größte Fischmaul schluckt das 
nächstkleinere usw. 


Betrachten Sie folgende Struktur der geschachtelten Schleifen: 


FOR A = 
FOR B 


Beachten Sie den Beginn (eine ausgeführte FOR-Anweisung) und das 
Ende (Treffen auf eine NEXT-Anweisung) der geschachtelten Schlei- 
fen. Haben Sie schon mal eine Reihe verschieden großer Kochtöpfe 
ineinander geschachtelt? Dies war möglich, da der äußere Rand des 
einen Topfes größer war als der des nächsten. Ebenso ist in ge- 
schachtelten Schleifen der "Umfang" einer Schleife "größer", als 
der "Umfang" der darin eingeschlossenen Schleife und "kleiner" 
als der "Umfang" der Schleife, in der diese liegt. 


Vorwärts- und Rückwärtsschritte 


Loops vergrößern sich normalerweise mit einer Schrittweite von 
"1". Es geht aber auch anders. Im folgenden Beispiel sehen Sie 
z.B. eine Schrittweite von "10": 


NEW<RETURN> 

10 PRINT "<CLR/HOME>" 

20 FOR I = 1 TO 100 STEP 10 
30 PRINT I 

40 NEXT I 


Dies erlaubt es Ihnen, den Zuwachs des Zählers selbst festzule- 
gen. Sie können genauso eine Variable verwenden, sofern sie einen 
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numerischen Wert beinhaltet. Zum Beispiel: 


NEW<RETURN> 

10 PRINT "<CLR/HOME>" 

20 K = 5:N = 25 

30 FOR I = K TO N STEPK 
40 PRINT I 

50 NEXT 


Geben Sie RUN ein. HALT!! werden Sie rufen. Sie haben in Zeile 50 
einen "BUG" entdeckt, einen typischen Fehler. Nach dem Wort NEXT 
sollte ein "I" stehen, aber da ist keines; richtig? Nun, im COM- 
MODORE-64-BASIC brauchen wir diese Variable nicht einzugeben. Sie 
sparen damit etwas Speicherplatz, wenn Sie die Variablen in den 
NEXT-Anweisungen nicht mit aufführen. Selbst in qgeschachtelten 
Schleifen ist die Angabe der Variablen hinter der NEXT-Anweisung 
nicht erforderlich, wenn Sie genügend NEXT-Anweisungen angeben. 
Es ist aber eine gute Programmierpraktik, die Variablen hinter 
den NEXT-Anweisungen anzugeben, da Sie den Verlauf der Schleifen 
besser verfolgen können. 


Weiterhin ist es möglich, rückwärts zu gehen. Testen Sie das Pro- 
gramm: 


NEW<RETURN> 

10 FOR I = 4 TO 1 STEP -1 

20 PRINT "ENDEPOSITION BEI # ";I 
30 NEXT I 


Wenn Sie kompliziertere (und nützlichere) Programme schreiben, 
sehen Sie, wie nützlich all diese unterschiedlichen Möglichkeiten 
des COMMODORE-64-BASIC sind. Oft werden Sie die praktische Ver- 
wendbarkeit der Kommandos nicht sofort sehen, wenn Sie diese aber 
später einmal einsetzen, werden Sie sich fragen, warum Sie nicht 
schon immer damit programmiert haben. 
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Falls Sie sich wundern sollten 


Sie haben vielleicht gemerkt, daß die Zeilen in einem Loop 
eingerückt dargestellt werden. Haben Sie dies auf Ihrem 
COMMODORE-64 schon probiert, haben Sie herausgefunden, daß 
die Einrückung beim ersten Auflisten des Programms wieder 
verschwunden ist? Leider können Sie dies ohne spezielle 
Hilfsprogramme (Utilities) nicht vermeiden. Machen Sie sich 
deshalb keine Sorgen. Dies ist nur eine Festlegung beim 
Programmieren, die für Klarheit mit Hilfe eingerückter Zei- 
len innerhalb der Schleife sorgt, damit einfacher zu sehen 
ist, was das Programm macht. Die Darstellung hat keinen 
Einfluß auf den Programmablauf. 
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zähler 


Oft möchten Sie die Anzahl der Schleifendurchläufe nach ihrer Be- 
endigung wissen und für eine spätere Verwendung zwischenspei- 
chern. Wenn Sie z.B. ein Programm mit einer Schrittweite von 3 
ablaufen lassen, wissen Sie vielleicht nicht genau, wie oft die 
Schleife durchlaufen wird. Um dies herauszufinden, benutzen Pro- 
grammierer Zähler, die bei jedem Eintritt in die Schleife (ge- 
wöhnlich um +1) hochgezählt werden. Das folgende Programm zeigt 
Ihnen den Einsatz eines Zählers: 


NEW<RETURN> 
10 PRINT "<CLR/HOME>" 

20 FOR I = 3 TO 99 STEP 3 

30 PRINT I 

40 N = N + 1:REM DIES IST DER ZÄHLER 

50 NEXT I 

60 ?:PRINT "DIE SCHLEIFE WURDE ";N;" MAL AUSGEFÜHRT." 


Beim ersten Eintritt in die Schleife hatte der Zähler "N" den 
Wert 0. In der Zeile 40 wurde dann jeweils 1 zum gegenwärtigen 
Wert von "N" addiert (z.B. 0+1=1). Beim zweiten Durchgang der 
Schleife wurde 1 zum Wert 1 dazuaddiert. Am Ende der Schleife, in 
Zeile 50, betrug der Wert von N=2, und er behält diesen bis zum 
Austritt aus der Schleife. Nach Beenden aller Schleifendurchläufe 
teilt Ihnen N mit, wie oft die Schleife durchlaufen wurde. Natür- 
lich zählen diese definierten Zähler nicht wirklich die Durch- 
läufe und können deshalb um jeden beliebigen Wert hochgezählt 
werden, auch mit Hilfe weiterer Variablen. Verändern Sie z.B. 
Zeile 40 folgendermaßen: 


40 N=N + (I*2) 


Geben Sie RUN ein und Sie sehen, daß Ihr Zähler um einiges höher 
ist. 
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3.4 Zusammenfassung 


Dieses Kapitel zeigte Ihnen die Leistungsfähigkeit Ihres Compu- 
ters. Wir haben angefangen, richtig zu programmieren. Als eines 
der wichtigsten Konzepte haben Sie die "Variablen" kennengelernt. 
Das bedeutsamste Merkmal von Variablen ist, daß sie ihren Wert 
ändern, je nachdem, was Ihr Programm durchführt. Dies gilt nicht 
nur für numerische, sondern auch für Stringvariablen. Die ver- 
schiedenen Input-Kommandos haben Ihnen gezeigt, wie Sie Werten 
oder Texten Variablen zuweisen, abhängig davon, was Sie mit dem 
Programm durchführen. Als letztes haben wir die Schleifentechnik 
kennengelernt. Diese erlaubt Ihnen, dem Computer mit einem mini- 
malen Aufwand mitzuteilen, daß er eine Reihe von Befehlen die 
durch zwei Anweisungen gekennzeichnet sind, mehrfach durchlaufen 
soll. Mit Schleifen können Sie Parameter für eine Operation mit 
gewünschter Schrittweise festsetzen, sich dabei zurücklehnen und 
Ihren COMMODORE-64 für sich arbeiten lassen. 


Wie auch immer, Sie haben gerade erst zu programmieren gelernt. 
Im nächsten Kapitel werden Sie mehr Kommandos und Operationen 
kennenlernen, die Ihnen erlauben, tiefer in den Möglichkeiten des 
COMMODORE-64 zu forschen und damit die Programmierarbeiten zu 
vereinfachen. Je mehr Kommandos Sie kennen, desto einfacher wird 
es, ein Programm zu schreiben. 
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Verzweigungen im Programm 
Einführung 


In diesem Kapitel beginnen wir mit einer neuen Programmiertech- 
nik, welche Ihre Fähigkeit, Programme zu schreiben, weiter er- 
höhen wird. Wir werden einige weiterentwickelte Techniken zeigen, 
und wenn Sie die Übungen Schritt für Schritt durchmachen, werden 
Sie die neuen Methoden beherrschen. Später, wenn Sie Ihre eigenen 
Programme entwerfen, sollten Sie den Mut haben, neue Kommandos 
auszuprobieren. Ein Problem haben alle Programmierer anfangs, 
nämlich, daß Sie nur die Kommandos verwenden, die Sie gelernt 
haben. Warum benutzen wir denn "kompliziertere" Kommandos, um das 
zu erreichen, was auch mit einfacheren Kommandos gemacht werden 
kann? Nun, die Antwort darauf ist sehr einfach. Welches Kommando 
ist denn nun wirklich einfacher, wenn ein "komplizierteres" Kom- 
mando die Arbeit von zehn "einfachen" Kommandos ausführen. Wenn 
Sie umfangreichere Programmanwendungen schreiben, werden Ihre 
Programme auch länger und neigen zu mehr Bugs. Je mehr Kommandos 
Sie dann zu prüfen haben, desto schwerer ist es, den Fehler zu 
finden. Während es deshalb in der Lernphase in Ordnung ist, lange 
Programme mit einer großen Anzahl einfacher Kommandos zu schrei- 
ben, sollten Sie später immer wieder daran denken, Programme 
durch den Gebrauch von komplexen Kommandos zu verkürzen. 


Das Hauptanliegen ist, daß Sie Ihr Wissen über die verschiedenen 
Kommandos steigern und die Berechnungen vom Computer ausführen 
lassen. Dies mag Ihnen jetzt etwas seltsam erscheinen, aber An- 
fänger versuchen oft, alles für den Computer vorzukauen, und ihn 
als besseren Taschenrechner zu verwenden. Im letzten Kapitel - 
vielleicht erinnern Sie sich daran - haben wir einen Zähler an- 
gelegt, der die Anzahl der Schleifendurchläufe (mit der Schritt- 
weite 3) protokolliert hat. Wir hätten auch selbst herausfinden 
können, wie oft die Schleife durchlaufen wurde, anstatt dies den 
Computer mit Hilfe des Counters (Zählers) ermitteln zu lassen. 
Damit hätten wir aber den Sinn des Programmierens verfehlt. 
Wenn Sie also neue Kommandos lernen, testen Sie gleich, wie Sie 
diese einsetzen können, damit das Programm Berechnungen ausführt, 
die Sie bisher selbst durchführen mußten. 
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4.1 Verzweigen 


Bisher sind alle unsere Programme, einschließlich der Schleifen, 
von Anfang bis Ende linear durchlaufen worden. Ihr COMMODORE-64 
kann jedoch auch einige Entscheidungen treffen. Dazu müssen wir 
ihm nur in der geeigneten Weise verschiedene Auswahlmöglichkeiten 
lassen. Wenn ein Programm den geraden Weg verläßt, wird dies ent- 
weder als Schleife oder als Verzweigung bezeichnet. Wir kennen 
bereits den Zweck einer Schleife, aber was ist eine Verzweigung? 
Wir wollen uns dies anhand der Kommandos IF/THEN und GOTO anse- 
hen. Tatsächlich haben wir mit dem GET-Statement im letzten Ka- 
pitel diese Kommandos bereits eingeführt. Betrachten Sie folgen- 
des Programm: (Hinweis: Sie sollten jetzt in der Lage sein, den 
Hauptspeicher mit NEW selbständig zu löschen, deshalb werde ich 
ab sofort dieses Kommando weglassen.) 
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10 PRINT "<CLR/HOME>" 

20 PRINT "WÄHLEN SIE BITTE ANHAND DER NUMMER AUS: " 
30 PRINT 

40 PRINT "1. BANANEN" 

50 PRINT "2. ORANGEN" 

60 PRINT "3. PFIRSICHE" 

70 PRINT "4. WASSERMELONEN" 

80 PRINT 

90 INPUT "IHRE WAHL? ";X 

100 PRINT "CLR/HOME" 

110 IF X = 1 THEN GOTO 200 

120 IF X 2 THEN GOTO 300 

130 IF X = 3 THEN GOTO 400 

140 IF X = 4 THEN GOTO 500 

150 GOTO 10:REM ES WIRD GEPRÜFT OB DER BEDIENER EINE DER 
ZAHLEN 1 BIS 4 EINGEGEBEN HAT 

200 PRINT "BANANEN":END 

300 PRINT "ORANGEN" :END 

400 PRINT "PFIRSICHE" :END 

500 PRINT "WASSERMELONEN":END 


Wie Sie sehen, "verzweigt" Ihr Computer zu der angegebenen Stel- 
le, führt dort die Anweisungen durch und beendet das Programm. 
Das war nicht sehr eindrucksvoll, aber ein klares Beispiel. Ver- 
suchen wir jetzt ein praktischeres Beispiel, um Ihren Kindern die 
Mathematikaufgaben zu erleichtern. 


10 PRINT "<CLR/HOME>" 

20 AG$ = "ADDITIONS-SPIEL ":PRINT AG$S 

30 PRINT:PRINT 

40 INPUT "BITTE ERSTE ZAHL EINGEBEN -->";A 
50 PRINT 

60 INPUT "BITTE ZWEITE ZAHL EINGEBEN -->";B 
70 PRINT 

80 PRINT "WAS IST ";A;" + ";B;:INPUT C 

90 IF C = A + B THEN GOTO 200 

100 PRINT:PRINT "DAS IST LEIDER NICHT GANZ RICHTIG. BITTE 
VERSUCHEN SIE ES NOCH EINMAL" :PRINT 


110 GOTO 80 

200 PRINT "RICHTIG! SEHR GUT!" 

210 PRINT 

220 PRINT "WOLLEN SIE WEITERMACHEN? (J/N): "; 
230 GET ANS:IF ANS = "" THEN GOTO 230 


240 IF ANS = "J" THEN PRINT "<CLR/HOME>":GOTO 30 
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250 PRINT "<CLR/HOME>" :PRINT:PRINT:PRINT 
260 PRINT "SPIELEN SIE BALD WIEDER":END 





10090 Fawt "tar 
Alam“ 
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Programm-Verzweigungen 


Sie sehen, je mehr Kommandos Sie lernen, desto mehr Freude macht 
das Programmieren. Ändern Sie zum Spaß das Programm so ab, daß 
Sie Subtraktionen, Multiplikationen und Divisionen damit durch- 
führen können. 


Der Reiz liegt im Namen! 


Kinder jedes Alters lieben es, ihren Namen auf dem Bild- 
schirm zu sehen. Sehen Sie zu, ob Sie das Beispiel oben so 


‚abändern können, daß es zuerst den Namen des Kindes er- 
fragt. Wenn das Programm dann die Antworten gibt, fügen Sie 
diese Variable mit ein. (z.B. DAS IST RICHTIG! SEHR GUT, 
MICHAEL). Benutzen Sie "NA$" als Variable für den Namen. 
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Sehen wir uns unser Programm genauer an, um etwas über die IF/ 
THEN-Abfrage zu lernen. In Zeile 240 bewirkt die Verzweigung das 
Löschen des Bildschirms, wenn ANS = "Y" ist. Bei einer anderen 
Antwort wird das Programm beendet. Sie werden sich fragen, warum 
das Programm nicht ohne Rücksicht auf die Antwort nach Zeile 30 
verzweigt, wenn das Kommando "GOTO 30" nach einem Doppelpunkt 
steht und somit eine neue Zeile andeutet. Eine gute Frage. Der 
Grund dafür ist, daß das Programm nach einer IF-Abfrage sofort zu 
der nächsten Zeilennummer springt, wenn die Antwort oder Bedin- 
gung = Null ist. Das heißt, jede Anweisung nach einem Doppelpunkt 
in einer Zeile mit einer IF-Abfrage wird nur dann ausgeführt, 
wenn die Bedingung der IF-Abfrage zutrifft. Weiterhin wird die 
Bedingung von ANS als "Y" abgefragt und nicht als einfaches Y 
ohne Anführungszeichen. Da der Benutzer aber ein Y und kein "Y" 
eingibt, nehmen wir an, daß das Programm das Y akzeptiert; denken 
Sie aber daran, daß AN$S ein "String" und keine numerische Variab- 
le ist. Deshalb müssen wir beim Setzen von Bedingungen darauf 
achten, welche Art von Variablen wir benützen. Wenn wir anderer- 
seits numerische Variablen, wie z.B. AN oder AN% verwenden, kön- 
nen wir die Abfrage so gestalten: 


IF AN = 1 THEN .o.e 


4.2 Vergleichsoperatoren 


Bis jetzt haben wir nur "=" verwendet, um festzulegen, ob unser 
Programm verzweigen soll oder nicht. Es gibt jedoch noch weitere 
Bedingungen, sogenannte "Vergleichsoperatoren", die wir abfragen 
können. Sie sehen unten eine komplette Liste mit allen Ver- 
gleichsoperatoren, die wir verwenden können. 


SYMBOL BEDEUTUNG 


= gleich 

< kleiner als 

> größer als 

<> ungleich 

>= größer oder gleich 
<= kleiner oder gleich 


95 


Verzweigungen im Programm 







Ihr seid alle 
als ich! 


Niemand 
oO mir! 
= mir: 


le" 
\ AHDATT K, 
ZZ 


Lassen Sie uns ein bißchen spielen und die Operationen auf ihre 


Leistungsfähigkeit überprüfen. Hier sind einige kleine Programme 
dafür: 


10 PRINT "<CLR/HOME>" 

20 INPUT "ZAHL 1 -->";A 

30 INPUT "ZAHL 2 -->";B 

40 IF A > B THEN GOTO 100 

50 IF A< B THEN GOTO 200 

60 IF A = B THEN GOTO 300 

100 PRINT "ZAHL 1 IST GRÖBER ALS ZAHL 2":END 
200 PRINT "ZAHL 1 IST KLEINER ALS ZAHL 2'":END 
300 PRINT "ZAHL 1 IST GENAUSO GROß WIE ZAHL 2" 


10 PRINT "<CLR/HOME>" 

20 "WOLLEN SIE WEITERMACHEN? (J/N)";ANS 
30 IF ANS <> "J" THEN END 

40 GOTO 10 
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10 PRINT "<CLR/HOME>" 

20 INPUT "WIE ALT SIND SIE? ";AG% 

30 IF AG% >= 21 THEN GOTO 100 

40 PRINT "<CLR/HOME>":PRINT:PRINT 

50 PRINT "ES TUT MIR LEID, ABER FÜR DIESES SPIEL MÜSSEN SIE 
ÄLTER ALS 21 SEIN!":END 

100 PRINT "<CLR/HOME>":PRINT:PRINT "WAS MÖCHTEN SIE GERNE 
TRINKEN?" 


Nun, Sie wissen jetzt, wie Sie die Vergleichsoperationen in IF/ 
THEN-Abfragen einsetzen können. Beachten Sie, daß diese sowohl 
mit Strings als auch mit numerischen Variablen funktionieren. Es 
gibt aber auch noch einen anderen Weg, Vergleichsoperatoren ein- 
zusetzen. Probieren Sie folgendes im Kommandomodus: 


A = 10:B = 20:PRINT A =B 
Ihr Computer antwortet mit 0, richtig? Es ist eine logische Oper- 
ation. Wenn eine Bedingung falsch ist, antwortet Ihr COMMODORE-64 


mit 0, wenn sie wahr ist, antwortet er mit -i1. Versuchen Sie das 
folgende kleine Programm: 


10 PRINT "<CLR/HOME>" 


20 A = 10 

30 B= 20 

40 C=A>B 
50 PRINT C 


Wenn Sie nun RUN eingeben, erhalten Sie wieder die 0, da die Va- 
riable C wie folgt definiert war: A ist größer B. Weil jedoch A 
kleiner B war, ist die Variable falsch oder 0. Gehen wir einen 
Schritt weiter: 


10 PRINT "<CLR/HOME>" 

20 A = 10 

30 B= 20 

40C=A>B 

50 IF C= 0 THEN PRINT "A IST KLEINER ALS B":END 
60 IF C = -1 THEN PRINT "A IST GRÖBER ALS B" 


Später werden wir weitere Anwendungen für diese logischen Opera- 
tionen auf dem COMMODORE-64 sehen. Im Augenblick ist es wichtig 
zu wissen, daß eine wahre Bedingung durch -1 und eine falsche Be- 
dingung durch 0 dargestellt wird. 
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4.3 AND/OR/NOT 


Manchmal müssen wir mehr als eine einfache Bedingung festsetzen. 
Stellen Sie sich vor, Sie möchten Ihre Finanzen in drei Katego- 
rien einteilen: (1) unter DM 10, (2) zwischen DM 10 und DM 100 
und (3) über DM 100. Mit unseren Vergleichsoperationen ist es 
einfach, die Eingaben unter DM 10 und über DM 100 zu unterschei- 
den. Was ist aber, wenn wir auch die Beträge dazwischen getrennt 
betrachten möchten? In diesem Fall hätten wir Schwierigkeiten 
ohne zusätzliche Kommandos. Die AND-, OR- und NOT-Bedingung er- 
laubt uns, mit unseren Vergleichsoperationen Bereiche zu setzen. 


AND Wenn alle Aussagen wahr sind, ergibt AND wahr 
OR Wenn eine Aussage wahr ist, ergibt OR wahr 
NOT Wenn die Aussage nicht zutrifft, ergibt NOT wahr 


Zum Beispiel: 


10 PRINT "<CLR/HOME>" 

20 INPUT "BITTE BETRAG EINGEBEN --> DM";A 

30 IF A< 10 THEN 100 

40 IF A> 10 AND A <= 100 THEN 200 

50 IF A > 100 THEN 300 

100 PRINT "WENIG ZUFRIEDENSTELLEND":GOTO 400 
200 PRINT "GANZ ORDENTLICH" :GOTO 400 

300 PRINT "GROßARTIGES ERGEBNIS" 

400 PRINT "WOLLEN SIE WEITERMACHEN? "; 

410 GET ANS:IF AN$S = "" THEN 410 

420 IF ANS <> "J" AND ANS <> "N" THEN PRINT "BITTE ANTWORTEN 
SIE NUR MIT "J" ODER "N" ":GOTO 400 

430 IF ANS = "J" THEN 10 

440 PRINT "<CLR/HOME>":PRINT "AUF WIEDERSEHEN" 


In Zeile 40 haben wir die Bedingung gesetzt, daß das Programm bei 
größer 10 und kleiner oder gleich 100 verzweigen soll. Die Varia- 
ble "A" hat beide Bedingungen zu erfüllen, damit verzweigt wird. 
Ebenso, in Zeile 420, haben wir die mit UND verknüpfte Bedingung 
dazu benutzt, um uns zu vergewissern, daß der Benutzer entweder 
"y" oder "N" eingibt. 


Wenn Sie das Programm sehr aufmerksam betrachtet haben, haben Sie 
sich bestimmt über einige eigenartige Formate gewundert. Da ste- 
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hen Zeilen mit IF/THEN-Abfragen, die nur mit THEN 100 oder ähn- 
lichem fortgesetzt werden. Was ist passiert? Sollte da nicht ein 
GOTO stehen? Wieder haben wir eine neue Möglichkeit des COMMODO- 
RE-64-BASIC gefunden. Wenn Sie IF/THEN-Abfragen verwenden, ist es 
möglich, das GOTO wegzulassen und nur die Zeilennummer der Ver- 
zweigung anzugeben. Beachten Sie jedoch, daß wir auch GOTO-An- 
weisungen ohne Bedingungen im Programm haben: abgetrennt durch 
einen Doppelpunkt in der gleichen Zeile. Bis Sie mehr Übung im 
Programmieren haben, ist es besser, die GOTO-Anweisungen weiter- 
hin auch bei den IF/THEN-Abfragen zu schreiben, auch wenn diese 
nicht erforderlich sind. 


Sie haben vielleicht noch eine andere Frage, welche die AND-Be- 
dingung in Zeile 420 betrifft. Normalerweise wenn wir sagen, 
etwas ist nicht "Y" oder "N", meinen wir, daß es das eine oder 
das andere sein muß. Beim Programmieren jedoch legen wir fest, 
daß das Programm verzweigt, wenn eine der Bedingungen zutrifft. 
So würde das Programm bei der Formulierung 


420 IF ANS <> "I" OR ANS <> "N" THEN PRINT "ANTWORTEN SIE 
BITTE MIT 'Y' ODER 'N' ":GOTO 400 


verzweigen, wenn AN$S ungleich "Y" oder ungleich "N" ist. Antwor- 
ten wir jetzt zum Beispiel mit "Y", ist "Y" ungleich "N" und das 
Programm würde "ANTWORTEN SIE BITTE MIT 'Y' ODER 'N'" ausgeben, 
was wir nicht wollten. Um dies zu testen, ändern Sie in Zeile 420 
das AND in ein OR und geben Sie RUN ein. 


Probieren wir jetzt OR- und NOT-Operatoren in einem Programm: 


10 PRINT "<CLR/HOME>" 

20 READ A 

30 READ B 

40 READ C 

50 DATA 10,20,20 

60 IFA+B=CORAX<BORA -B= C THEN 100 

70 END 

100 PRINT "<CLR/HOME>" 

110 PRINT "EINE DIESER AUSSAGEN MUSS RICHTIG SEIN" 


In Zeile 60 sehen wir, daß A - B nicht gleich C, jedoch A + B 
gleich C, und A kleiner B ist. Bei der OR-Bedingung muß nur eine 
der Abfragen wahr sein, damit verzweigt werden kann. Probieren 
wir jetzt folgendes Programm: 
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10 PRINT "<CLR/HOME>" 
20 READ A:READ B:READ C 
30 DATA 10,20,30 

40 2=-A-B=C 

50 IF NOT Z THEN 100 

60 END 


100 PRINT "DAS IST RICHTIG! A - B = C IST FALSCH! - SAGTE 
ICH DAS NICHT?" 


Wie aus dem Beispiel ersichtlich ist, können wir die "Negation" 
verwenden, um eine Bedingung zu formulieren. In den meisten 
Fällen benutzen Sie <> (ungleich) oder die positive Abfrage, aber 
manchmal ist es einfacher, NOT einzusetzen. 
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4. 4 Unterroutinen 


Sie haben in Ihrem Programm häufig gleiche Operationen, die sie 
an mehreren verschiedenen Stellen im Programm ausführen möchten. 
Sie können jetzt diese Reihe von Instruktionen immer wieder ein- 
geben oder mit GOTOs zu Operationen springen und nach Ausführung 
mit GOTO wieder zurückkehren. Andererseits können Sie "Unterrou- 
tinen" (subroutines) schreiben, diese mit GOSUB ansteuern und 
nach Beendigung der Routine mit RETURN zum Ausgangspunkt zurück- 
kehren. Im Prinzip arbeitet das GOSUB-Kommando genau wie das 
GOTO-Kommando - es schickt Ihr Programm zu einer Abfolge außer- 
halb des geradlinigen Programmablaufs. Auch durch das RETURN-Kom- 
mando schickt das Programm, wie das GOTO, zu einer Zeile außer- 
halb der normalen Reihenfolge. Wie auch immer, die GOSUB/RETURN- 
Folge ist einzigartig in der Arbeitsweise. Sehen wir uns dazu ein 
einfaches Beispiel an: 


10 PRINT "<CLR/HOME>" 
20 AS = "HALLO" :GOSUB 100 


30 A$ = "WIE GEHT ES IHNEN HEUTE?" :GOSUB 100 
40 AS = "MIR GEHT ES SEHR GUT":GOSUB 100 

50 END 

100 PRINT AS 

110 RETURN 


Unser Beispiel zeigt, daß eine Anweisung nach einem GOSUB ebenso 
abgearbeitet wird wie in der gleichen Zeile, nur daß sie in einem 
anderen Teil des Programms ausgeführt wird. Die RETURN-Anweisung 
bringt uns zu der nächsten Anweisung nach der GOSUB zurück. Die 
Verwendung von GOSUB/RETURN ist einfacher, da das RETURN Sie au- 
tomatisch auf den Folgebefehl zurückbringt. 


Um den Nutzen von GOSUB besser zu zeigen, verändern wir die Zeile 
100. Probieren Sie folgendes: 


100 L = LEN(AS$S)/2:PRINT TAB(20 - L);AS 


Wenn Sie nun RUN eingeben, erscheinen alle Ihre Strings zen- 
triert. Wie Sie sehen, dient diese kleine Routine dazu, Text zu 
zentrieren. Anstatt die Routine jedesmal, wenn Sie einen Text 
zentrieren möchten, neu zu schreiben, benutzen Sie nur das GOSUB 
zu der Zeile 100. 
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Sinnvolle Gliederung 


Bis jetzt haben wir die Struktur des Programms nicht geson- 
dert besprochen. Es war auch nicht notwendig. Wenn Ihre 
Instruktionsfolgen jedoch länger werden, wächst auch die 
Fehlerhäufigkeit. Wenn Sie bislang noch keinen Fehler ge- 
macht haben, dann nur deshalb weil Sie sich streng an unse- 
re Programme gehalten haben. Sie können, um speziell bei 
GOSUBs Fehler zu minimieren, das Programm in zusammenhän- 


gende "Blöcke" gliedern. Ein Block ist eine Unterroutine 
mit einer Anzahl von Zeilen. Zum Beispiel können Sie die 
Blöcke der Unterroutine in 100er oder 1000er gliedern, je 
nach der Länge der Blöcke. Das heißt, die Unterroutinen be- 
ginnen mit Zeilennummer 500, 600 und 700. Dabei ist es 
gleich, ob der Block 1 oder 10 Zeilen lang ist. Die Fehler- 
suche ist dadurch einfacher und es ist auch leichter für 
andere und Sie selbst nachzuvollziehen, was in dem Programm 
passiert. Es ist generell eine gute Programmiertechnik. 





Errechnetes GOTO und GOSUB 


Wir kommen jetzt zu einem seltsamen Beispiel, das während des 
Programmlaufs jedoch in einer klaren und einfachen Programmierung 
resultiert. Wie wir bereits sahen, können wir mit GOTO und GOSUB 
bei einer Bedingung verzweigen (z.B. IF A = 1 THEN GOTO 200). Ein 
einfacherer Weg, einen bedingten Sprung durchzuführen, ist die 
errechnete Verzweigung unter Verwendung der ON-Anweisung. Zum 
Beispiel: 


10 PRINT "<CLR/HOME>" 

20 INPUT "BITTE GEBEN SIE EINE ZAHL ZWISCHEN 1 UND 5 EIN ";A 
30 IF A< 1 OR A > 5 THEN 20:REM PRÜFUNG 

40 ON A GOSUB 100,200,300,400,500: REM ERRECHNETER GOSUB 

50 PRINT "WOLLEN SIE FORTFAHREN? (J/N) "; 


60 GET ANS:IF ANS = "" THEN 60 
70 IF ANS <> "J" THEN END 
80 GOTO 10 


100 PRINT "EINS" :RETURN 
200 PRINT "ZWEI" :RETURN 
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300 PRINT "DREI" :RETURN 
400 PRINT "VIER" :RETURN 
500 PRINT "FÜNF": RETURN 


Um ein errechnetes GOSUB/GOTO durchzuführen, geben Sie eine Va- 
riable hinter der ON-Anweisung ein. Das Programm springt dann die 


Zeilennummern an, die durch Kommas getrennt sind. Wenn A= 1 
ist, wird die erste Zeilennummer genommen, bei A = 2 die zweite, 
usw. Dies ist weit einfacher als die Eingabe: "IFA= 1 THEN 


GOSUB 100: IF A = 2 THEN GOSUB 200: usw.". Es ist jedoch notwen- 
dig, eine relativ kleine Ziffer für die "ON"-Variable zu nehmen, 
da die Anzahl der Unterroutinen begrenzt ist. Wenn Ihr Programm 
eine größere Zahl errechnet, wandeln Sie diese erst in kleinere 
Werte um. Zum Beispiel: 


10 PRINT "<CLR/HOME>" 

20 INPUT "GEBEN SIE IRGENDEINE ZAHL EIN -->";A 

30 IF A< 100 THENB = 1 

40 IF A >= 100 AND A < 200 THEN B= 2 

50 IF A >= 200 THEN B = 3 

60 ON B GOSUB 100,200,300:REM AUFGRUND DER VARABLEN B 
ERRECHNETER SPRUNG 

70 PRINT "WEITER? (J/N) "; 


80 GET ANS:IF ANS = "" THEN 80 
90 IF ANS <> "J" THEN END 
95 GOTO 10 


100 PRINT "WENIGER ALS 100" :RETURN 
200 PRINT "MEHR ALS 100 ABER WENIGER ALS 200" :RETURN 
300 PRINT "MEHR ALS 200" :RETURN 


Lassen Sie das Programm ablaufen und geben Sie eine Nummer ein. 
Da das Programm nur in Abhängigkeit von der Variablen B, und 
nicht von A (der INPUT-Variablen), verzweigt, bekommen Sie keinen 
Fehler, da der größte Wert von B nur 3 erreichen kann. 


Lassen Sie uns noch einmal zu den Vergleichsoperatoren zurückkeh- 
ren, um zu sehen, wie diese in errechneten GOSUBs eingesetzt wer- 
den können. Erinnern Sie sich, daß die einzigen Zahlen, die wir 
bei Vergleichsoperationen erhalten, 0 oder 1 sind, was falsch 
oder wahr entspricht. Wir können die 0 oder 1 jedoch wie reguläre 
Zahlen benutzen. Probieren Sie folgendes: 


10 PRINT "<CLR/HOME>" 
20 X = 1:Y= 2:2 =3 
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30A=X<2Z 

40B=-Y>2 

50C=2Z>X 

60 PRINT "A+ A= ";A+_A 

70 PRINT:PRINT "A + B= ";A+B 

80 PRINT:PRINT "A+B+C= ";A+B+rC 
90 END 


Bevor Sie nun RUN eingeben, sollten Sie sich überlegen, was in 
Zeile 60, 70 und 80 ausgegeben wird. Haben Sie ein Ergebnis er- 
halten, geben Sie RUN ein und sehen Sie, was passiert. Probieren 
Sie es aus. Kommen Sie zurecht damit? Lassen Sie es uns Schritt 
für Schritt durchgehen: 


1. Da X kleiner als Z ist, ist auch A "wahr" und erhält so 
den Wert eins (-1). Folglich ist A (-1 + -1) gleich -2. 


2. Da Y nicht größer Z ist (Y = 2 und Z = 3), ist B falsch 
und erhält den Wert 0. Deshalb gibt A+B (-1 + 0) die 
Summe -1. 


3 Da Z größer X ist, ist auch C "wahr" und erhält den 
Wert -1. Es ergibt sich daraus A+B+cC (-1 +0 + -1) 
gleich -2. 


Sie haben es richtig gelöst? Gratuliere! Wenn nicht, Kopf hoch, 
und überarbeiten Sie es noch einmal. Erinnern Sie sich an die 
einfachen Ergebnisse und suchen Sie nicht nach komplizierten 
Erklärungen! 


Sie wissen jetzt, wie Sie durch Verwendung von Vergleichsoperato- 
ren Zahlenwerte erhalten und werden diese für errechnete GOSUBs 
benutzen. Das folgende Programm zeigt Ihnen wie: 


10 PRINT "<CLR/HOME>" 

20 INPUT "WIE GROSS WAR DIE ZUSCHAUERMENGE? ";HC 
30 R= 1 + (HC >= 500) + (HC >= 1000) 

40 IF R= 0 THENR=2 

50 IFR= -1 THENR = 3 

60 ON R GOSUB 100,200,300 

70 PRINT:INPUT "WEITER? (J/N) ";ANS 

80 IF ANS <> "J" THEN END 

90 GOTO 10 

100 PRINT "<CLR/HOME>" 
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110 PRINT "DIE ZUSCHAUER KAMEN NICHT SEHR ZAHLREICH - NICHT 
EINMAL 500" :RETURN 

200 PRINT "<CLR/HOME>" 

210 PRINT "EIN GUTER SCHNITT - IMMERHIN ZWISCHEN 500 UND 
1000" :RETURN 

300 PRINT "<CLR/HOME>" 

310 PRINT "DIE ZUSCHAUERMENGE WAR SEHR GROSS - 1000 ODER 
MEHR" : RETURN 


Dieses Programm wird durch die Formel (Algorithmus) in Zeile 30 
gesteuert. Lassen Sie uns diese genau ansehen: 


Is Es gibt drei Bedingungen: 


a) HC ist kleiner als 500 
b) HC liegt zwischen 500 und 1000 
c) HC ist größer als 1000 


2» Trifft die erste Bedingung zu, sind HC >= 500 und HC 
>= 1000 beide falsch. Also 1 + 0 + 0 = 1. Deshalb ist R 
=: 1, 


3: Wenn HC >= 500 aber kleiner 1000 ist, ist HC >= 500 
wahr, aber HC >= 1000 falsch. Wir erhalten also 1 + (- 
1) + 0 = 0. Der Wert von R ist gleich 2. 


4. Ist HC >= 500 und >= 1000, ergibt sich mit unserer 
Formel 1 + (-1) + (-1) = -1. R erhält den Wert 3. 
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Eine kleine Pause 


Lassen Sie uns hier eine kleine Pause für einen Rückblick 
einlegen. Beim Programmieren gibt es keinen RICHTIGEN oder 
FALSCHEN Weg. Manche Programme sind nur leistungsfähiger, 
schneller oder brauchen weniger Speicherplatz als andere. 
Wenn ein Programm das ausführt, was Sie wollten, spielt es 
keine Rolle, wie langsam es ist oder wie lange Sie zur Er- 
stellung brauchten: es ist "gut". Im Beispiel oben haben 
wir einen Algorithmus mit Vergleichsoperatoren benutzt, um 
das zu erreichen, was wir sonst nur mit mehr Codieraufwand 
erreichen würden. Arbeiten Sie mit solchen Formeln aber 
erst, wenn Sie sich das nötige Grundwissen in Mathematik 
angeeignet haben. Wenn Sie nicht häufig mit Algorithmen ar- 
beiten, erwarten Sie nicht, sofort die volle Wirkungsweise 
zu verstehen. Der Algorithmus, den wir benutzt haben, ist 
relativ einfach. Wenn Sie sich weitere Programme ansehen, 
werden Sie auch etwas kompliziertere entdecken. Die Haupt- 
sache ist, am Ball zu bleiben. Durch die Praxis werden Sie 
alle Formeln und Programmkürzungen lernen. Denken Sie da- 
ran: solange Sie Ihre Programme so zum Laufen bringen, wie 
Sie sich das vorgestellt haben, sind Sie auf dem "richtigen 
Weg". 





Strings und Vergleichsoperatoren 


Bevor wir den Abschnitt der errechneten GOTOs und GOSUBs mit Ver- 
gleichsoperatoren verlassen, sehen wir uns noch an, wie diese auf 
Strings einwirken. Probieren Sie folgendes aus: 


AS = "A":BS = "B":PRINT BS > AS <RETURN> 


Nun, überrascht? Vergleichsoperatoren können also nicht nur nume- 
rische Variablen, sondern auch alphabetische Strings vergleichen, 
wobei "A" den kleinsten und "Z" den größten Wert darstellt. Bei 
der Frage, ob B$S größer als AS ist, erhalten wir "-1" (wahr), da 
B$S ein B und A$ ein A enthält. Sie fragen sich jetzt vielleicht, 
was Sie mit diesem neuen Wissen anfangen können. Nun, beim Sor- 
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tieren von Strings (z.B. eingegebene Namen in die alphabetische 
Reihenfolge bringen) ist diese Operation hilfreich. Wir zeigen 
Ihnen später eine Routine, mit der Sie Strings sortieren können. 
Zunächst aber noch ein kleines Beispiel zum Sortieren von zwei 
eingegebenen Strings. 


10 PRINT "<CLR/HOME>" 

20 INPUT "WORT #1 -->";AS 

30 INPUT "WORT #2 -->";BS 

40 PRINT:PRINT:PRINT 

50 IF AS < B$ THEN PRINT AS:PRINT BS 
60 IF AS > B$ THEN PRINT BS$:PRINT AS 


Das war's! Ein Programm, das zwei Wörter in eine alphabetische 
Reihenfolge bringt. 


4.5 Tabellen 


Am besten ist, Sie stellen sich unter einer Tabelle eine Art Va- 
riable vor. Sie wissen bereits, daß Sie Namen wie A, D$, KK% oder 
X1 an Variablen vergeben können. Eine Tabelle benutzt einen ein- 
zigen Namen, um verschiedene Variablen zu unterscheiden. Betrach- 
ten Sie die beiden folgenden Listen. Die eine enthält normale 
Variablen, die zweite benutzt eine String-Tabelle: 


STRING VARIABLE STRING TABELLE 
S$ = "KATZE" AMS(1) = "KATZE" 
HS = "HUHN" AMS(2) = "HUHN" 

D$ = "DOGGE" AMS (3) = "DOGGE" 
P$ = "PFERD" AM$(4) = "PFERD" 


Wenn Sie jetzt D$ ausgeben, sehen Sie DOGGE, ebenfalls bei der 
Ausgabe von AMS(3). Auch für numerische Variablen können wir 
Tabellen definieren, z.B. 
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Ali) = 1 
A(2) = 2 
A(3) = 3 
A(4) 4 usw. 
Sie werden sich erneut fragen: "Warum nehmen wir nicht normale 


Strings oder numerische Variablen anstelle der Tabelle?" Erstens: 
ist es bei Benutzung einer Tabelle einfacher, den Überblick dar- 
über zu behalten, was im Programm abläuft. Zweitens spart eine 
Tabelle jede Menge Zeit. Sehen Sie sich das folgende Programm zur 
Eingabe von 10 Namen an, das eine String-Tabelle benutzt: 


10 PRINT "<CLR/HOME>" 
20 FOR I = 1 TO 10 


30 PRINT "NAME #";I;:INPUT NAS(I) 
40 NEXT I 

50 FOR I=1 TO 10:PRINT NAS(I) 

60 NEXT I 


Schreiben Sie nun ein Programm mit normalen Strings, das die 
gleiche Verarbeitung durchführt. Es wird sehr viel mehr Codier- 
aufwand nötig sein, aber versuchen Sie es ruhig. Benutzen Sie da- 
zu die Variablen NOS bis N9S. 


Nach der Erstellung dieses Programms sehen Sie, wieviel Zeit es 
spart, Tabellen zu verwenden. Bevor wir weitermachen, sehen wir 
uns noch genau an, wie das Programm mit der FOR/NEXT-Schleife und 
der Tabelle arbeitet: 


1« Die FOR/NEXT-Schleife erzeugt fortlaufende Nummern, so 
daß folgende Tabelle entsteht: 


FOR I = 1 TO 10 

NAS(1) <-- ERSTER SCHLEIFENDURCHLAUF 
NAS (2) <-- ZWEITER SCHLEIFENDURCHLAUF 
NA$(3) <-- DRITTER SCHLEIFENDURCHLAUF 
NAS(4) usw. 

NAS$ (5) 

NAS (6) 

NAS (7) 

NAS (8) 

NAS (9) 

NAS (10) 

NEXT I 
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2; Jede Stringvariable des Benutzers wurde in der fortlau- 
fend numerierten Tabellenvariablen gespeichert. 


3% Die Ausgabe durch PRINT wurde mit der FOR/NEXT-Schleife 
durch Wiedergabe der Nummern in die Tabellenvariable 
programmiert. 


Um sich mit der Idee anzufreunden, daß die Tabellenvariable auch 
nur ein Variablentyp ist, geben Sie folgendes ein: 


A(10) = 432:PRINT A(10) <RETURN> 

XYZ(9) = 2.432:PRINT XYZ(9) <RETURN> 

R2D2$(1) = "BEEP!" + CHRS(7) :PRINT R2D2$(1) <RETURN> 
J%(5) = 321:PRINT J%(5) <RETURN> 


Nun, Sie denken jetzt vielleicht beim Wort "Tabellen" nicht mehr 
an etwas Exotisches. 


Das DIMensionieren von Tabellen 


Wenn Sie sehr aufmerksam mitgearbeitet haben, ist Ihnen sicher 
aufgefallen, daß wir keine größere Zahl als 10 verwendet haben. 
Der Grund dafür ist, daß Sie durch die DIM-Anweisung Speicher- 
platz für die Tabelle reservieren müssen, wenn diese größer als 
10, genauer gesagt: größer als 11 ist (0 - 10 entspricht 11 Ta- 
bellenelementen). Sie sehen unten ein Beispiel mit einem Format 
der DIM-Anweisung. 


10 PRINT "<CLR/HOME>" 

20 DIM AB(150) :REM DIMENSIONIERUNG FÜR DIE TABELLE 
30 FOR I = 1 TO 150 

40 AB(I) = I 

50 NEXT I 

60 FOR I = 1 TO 150 

70 PRINT AB(I), 

80 NEXT I 


Geben Sie das Programm und RUN ein. (Das Programm müßte laufen.) 
Löschen Sie nun Zeile 20 durch Eingabe der Zeilennummer. Wenn Sie 
jetzt RUN eingeben, bekommen Sie einen Fehler für die nicht di- 
mensionierte Tabelle (? BAD SUBSCRIPT ERROR IN 40 - da sich in 
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Zeile 20 jetzt keine DIM-Anweisung mehr befindet). Achten Sie al- 
so bei Tabellen, die mehr als 11 Elemente (von 0 bis 10) ent- 
halten, auf die DIM-Anweisung. 


Besser Sicherheit als Probleme 


Viele Programmierer dimensionieren alle Tabellen, ohne 
Rücksicht auf die Anzahl der Elemente in der Tabelle. Dies 
ist durchaus richtig und Angaben wie DIM X$(3) oder DIM 


N%(5) sind gültig. Wenn Sie Programme aus Zeitschriften und 
Büchern übernehmen, werden Sie häufig diese niedrigen DIM- 
Anweisungen vorfinden. Nicht weil sie notwendig sind, son- 
dern weil die Programmierer es einem klaren Programmstil 
zuliebe für gut halten, alle Tabellen zu dimensionieren. 





Mehrdimensionale Tabellen 


Bis jetzt haben Sie nur eindimensionale Tabellen kennengelernt. 
Es ist aber auch möglich, Tabellen mit zwei oder mehr Dimensionen 
anzulegen. Beginnen wir mit zweidimensionalen Tabellen und 
schauen wir, wie Tabellen mit mehr als einer Dimension anzuwenden 
sind. 


Am besten stellen Sie sich eine zweidimensionale Tabelle als Ma- 
trix vor. Zum Beispiel enthält folgende Reihe von 1 bis 3, eine 
Tabelle in 2 Dimensionen: A(1,1) A(1,2) A(1,3) A(2,1) A(2,2) 
A(2,3) A(3,1) A(3,2) A(3,3). Bei der Einteilung in eine Matrix 
können wir die erste Ziffer als Zeilen- und die zweite als Spal- 
tenindex betrachten. Das Beispiel macht es etwas klarer: 


SPALTE SPALTE SPALTE 

#1 #2 #3 
ZEILE #1 A(1,1) A(1,2) A(1,3) 
ZEILE #2 A(2,1) A(2,2) A(2,3) 
ZEILE #3 A(3,1) A(3,2) A(3,3) 
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Es ist wichtig, sich daran zu erinnern, daß jedes Element der Ta- 
belle nur einen Variablentyp darstellt. Um sich dies einzuprägen, 
probieren Sie folgendes aus: 


xV$(3,1) = "ICH BIN EINE VARABLE":PRINT XV$(3,1) <RETURN> 
JK%(2,2) = 21:PRINT JK% <RETURN> 
MM(1,1) = 3.212:PRINT MM(1,1) <RETURN> 


Um Tabellen mit all ihren Vorteilen im Programm einzusetzen, müs- 
sen sie als Variablen betrachtet werden. Im nächsten Programm, 
das die 12 Mitglieder eines Orchesters in einer Matrix auflistet, 
benutzen wir eine zweidimensionale Tabelle. 


10 PRINT ">CLR/HOME>" 

20 DIM BA$(4,4) :REM FÜR 3 SPALTEN UND 3 ZEILEN 

30 FOR I = 1 TO 4:REM ZEILEN 

40 FOR J=1 TO 4:REM SPALTEN 

50 READ BAS(I,J) 

60 NEXT J 

70 NEXT I 

80 DATA RALF,PETER,MARLENE,FRANK,HANS,DAVID,KARL,UWE 

90 DATA ERICH, MARIA, TOM, SUE, PAUL, JOSEF, NANA, BETTINA 
100 REM AUSGABEBLOCK 

110 FOR I=1 TO 4:REM ZEILEN 

120 FOR J=1 TO 4:REM SPALTEN 

130 PRINT BAS$S(I,J),:REM KOMMA WIRKT ALS TABULATOR AUF JEDE 
14. STELLE 

140 NEXT J 

150 NEXT I 


Wenn Sie das Programm ablaufen lassen, wird jedes der Mitglieder 
aufgelistet. Sie können das gleiche auch mit einer Dimension aus- 
führen, da Sie die PRINT-Ausgabe in Zeile 130 auch mit Komma for- 
matieren könnten. Was ist also besser an der zweidimensionalen 
Tabelle? Um dies zu sehen, erweitern wir unser Programm um einige 
Zeilen: 


160 PRINT:PRINT "ZUM FORTFAHREN IRGENDEINE TASTE BETÄTIGEN"; 
170 GET ANS:IF ANS = "" THEN 170 

180 PRINT "<CLR/HOME>" 

185 PRINT "WELCHE ZEILE & SPALTE MÖCHTEN SIE SEHEN?" 

190 INPUT "ZEILE # ->";R 

200 INPUT "SPALTE #->";cC 

210 PRINT:PRINT BAS(R,C); " IST DER INHALT VON ZEILE ";R; 
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" SPALTE ";C 
220 PRINT:PRINT "WEITERE ANZEIGEN? (J/N) "; 
230 GET M$:IF MS = "" THEN 230 


240 IF M$S ="J" THEN 180 


Sie können jetzt den Wert oder Inhalt eines speziellen Elements 
in zwei Dimensionen lokalisieren. Wenn Sie in unserem Beispiel 
die Zeilen- und Spaltennummer wissen, finden Sie das Mitglied 
dieser Position. Die Verwendung von zweidimensionalen Tabellen 
ist in Fällen, die mit einer Matrix bearbeitet werden, eine wich- 
tige Ergänzung Ihrer Programmierkommandos. 


Es ist auch möglich, mehrere Dimensionen in einer Tabellenvaria- 
blen zu haben. Wenn Sie mit mehreren Dimensionen arbeiten, dürfen 
Sie die verschiedenen Aspekte einer eindimensionalen Tabelle 
nicht außer acht lassen. Manchmal, wenn eine mehrdimensionale Ta- 
belle schwer zu definieren oder zu handhaben ist, ist es besser, 
sie in mehrere ein- oder zweidimensionale Tabellen zu teilen. 
Lassen Sie uns ein Beispiel mit einer dreidimensionalen Tabelle 
durchgehen (Übrigens basiert dieses Problem auf einer wirklichen 
Anwendung): 


10 PRINT "<CLR/HOME>" 

20 PRINT "WEINKELLER-ORGANISATION" 

30 PRINT:PRINT "WIEVIELE REGALE, ZEILEN, SPALTEN?" 

35 INPUT "(BITTE WERTE DURCH KOMMA GETRENNT EINGEBEN) ;RK,R,C 
40 DIM WIS(RK,R,C) 

50 INPUT "WIEVIELE FLASCHEN WOLLEN SIE UNTERBRINGEN? ";N% 
60 PRINT:FOR I = 1 TO N% 

70 INPUT "REGAL #->";RA 

80 INPUT "ZEILE #->";RO 

90 INPUT "SPALTE #->";Co 

100 INPUT "NAME DES WEINES: ";WNS 

110 WIS(RA,RO,CO) = WNS 

120 NEXT I 

200 REM ROUTINE FÜR DIE ÜBERPRÜFUNG DES WEINKELLERS 

210 PRINT "<CLR/HOME>" 

215 INPUT "WELCHES REGAL WOLLEN SIE ÜBERPRÜFEN? #-> ";RR 
220 FOR I=1 TOR 

230 FOR J = 1 TO C 

240 IF WIS(RR,I,J) = "" THEN WIS(RR,I,J) = "LEER" 

250 PRINT "REGAL #" ; RR; "ZEILE #";1; "SPALTE #" ;J; "ENTHÄLT"; 
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WIS(RR,I,J) 
260 NEXT J 
270 NEXT I 
280 END 


Dies war ein relativ langes Programm. Sehen Sie es genau durch, 
damit Sie verstehen, was es macht. Lassen Sie mich nochmals daran 
erinnern, daß eine dreidimensionale Tabelle nur eine Variable mit 
einer Menge Ziffern in Klammern darstellt. Achten Sie auch in 
Zeile 35 darauf, wie wir mit einer einzigen INPUT-Anweisung meh- 
rere Werte eingeben. Wir benutzen das Format 


INPUT A,B,C 


und solange dem Operator (Benutzer) mitgeteilt wird, wie viele 
Eingaben, durch Komma getrennt, er zu machen hat, ist alles in 
Ordnung. Es wäre gut, dieses Programm als Beispiel für eine mehr- 
dimensionale Tabelle auf Diskette zu speichern. 
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4.6 Zusammenfassung 


In diesem Kapitel haben Sie sehr viel gelernt. Wenn Sie alles 
verstanden haben - sehr gut! Wenn nicht, lassen Sie den Kopf 
nicht hängen. Wenn Sie mehr Praxis haben, wird alles viel klarer. 
Probieren Sie auf alle Fälle die Beispiele aus. Seien Sie mutig, 
und wagen Sie Experimente mit den erlernten Kommandos. Solange 
Sie eine Übungsdiskette besitzen, löschen Sie schlimmstenfalls 
einige Programme. 


Sie haben gelernt, daß Ihr COMMODORE-64 rechnen kann. Mit der IF/ 
THEN-Abfrage und den Vergleichsoperatoren geben Sie Ihrem Compu- 
ter die Fähigkeit der "Entscheidungsfindung". Durch die Unterrou- 
tinen ist es möglich, an Entscheidungspunkten in einen anderen 
Teil - des Programms zu verzweigen. Errechnete GOTOs und GOSUBSs 
erlauben die Durchführung entsprechender Sprünge mit minimalem 
Programmieraufwand. 


Zuletzt haben wir uns die Tabellenvariablen genauer angesehen. 
Tabellen erlauben uns, Werte in fortlaufend angeordneten Varia- 
blen oder Elementen einzugeben. Durch FOR/NEXT-Schleifen ist es 
möglich, schnell mehrfach vorkommende Variablen gleicher Art, bis 
zur Grenze der festgelegten DIMension, zu bearbeiten. Die Tabel- 
len nützen uns nicht nur bei der Verarbeitung der geordneten Va- 
riablen, sondern ersparen uns auch eine Menge Zeit. 


Im nächsten Kapitel beginnen wir mit Variablen zu arbeiten, die 
uns helfen, alles zu arrangieren. Da unsere Programme jetzt immer 
länger und komplizierter werden, müssen wir mit großer Sorgfalt 
arbeiten. Wir können besser klare und nützliche Programme erstel- 
len, indem wir sie in kleine, handliche Abschnitte gliedern. 
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Einführung 


Wenn Sie immer mehr Informationen eingeben und diese nicht orga- 
nisieren, werden die Programme verwirrend. Eine gute Organisation 
erlaubt Ihnen, komplexere und längere Programme zu verarbeiten. 
Diese Organisation kommt mit der Erfahrung im Programmieren von 
selbst. Beherrschen Sie mehr Kommandos, können Sie mehr machen. 
Aber je mehr Sie machen, desto größer wird die Gefahr, sich im 
Programm zu verlieren. 


Ausgaben zu formatieren ist einer der wichtigsten Punkte, der 
dabei hilft, den "Overflow" (Überlauf) zu verhindern. Variablen 
mischen sich, Tabellen sind falsch numeriert und der Bildschirm 
ist ein Chaos. Um diese Probleme in den Griff zu bekommen, werden 
wir uns intensiv mit der Formatierung von Texten und Strings be- 
schäftigen. Nicht nur, damit wir in der Lage sind, Ausgaben zu 
steuern, sondern auch wegen des Programmstils. 


Der zweite Hauptbereich in bezug auf die Unordnung ist der I/O 
(INPUT/OUTPUT). Einige der Probleme in diesem Bereich hängen mit 
der Formatierung zusammen; grundlegender ist jedoch das Problem 
der Organisation der Ein- und Ausgabe. Daten müssen mit den pas- 
senden Variablen verbunden und zur richtigen Verarbeitung bereit- 
gestellt werden. Zusätzlich werden wir uns die Organisation der 
Datenverarbeitung ansehen. 


5.1 Formatieren von Text 


In Kapitel 1 erwähnten wir, daß die Tastatur des COMMODORE-64 der 
einer Schreibmaschine ähnlich ist. Bei einer Schreibmaschine kön- 
nen Sie Tabulatoren setzen, so daß der Text einen festgelegten 
Leerraum am linken Rand aufweist. Beim COMMODORE-64 haben Sie ei- 
ne TAB und SPC Funktion, deren Bedeutung wir uns gleich ansehen: 
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KOMMANDO BEDEUTUNG 

TAB(n) wird in der PRINT Anweisung benutzt, um das 
nächste Zeichen n Spalten vom linken Rand zu 
plazieren. 

SPC(n) wird in der PRINT Anweisung benutzt und 
stellt dem String n Leerzeichen voran. 

<HOME> plaziert den Cursor in der linken oberen Ecke 


des Bildschirms. Wird ohne Drücken der SHIFT 
Taste betätigt. 





Um besser zu verstehen, wie diese Kommandos Text formatieren, 
wollen wir sie gleich einsetzen. 


10 PRINT "<CLR/HOME>":PRINT:PRINT 

20 PRINT TAB(20); "HIER WURDE DER TABULATOR GESETZT" 

30 PRINT SPC(20); "BIS HIERHER WURDEN LEERZEICHEN EINGEFÜGT" 

40 PRINT "<HOME>"; "HIER IST OBEN":REM DRÜCKEN SIE DIE TASTE 
<CLR/HOME> OHNE DIE SHIFT-TASTE - SIE BEKOMMEN EIN INVERSES 

ns" 

50 FOR I = 1 TO 20:PRINT:NEXT:PRINT "HIER IST UNTEN" 
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Achten Sie nach Eingabe von RUN darauf, daß die Benutzung von 
<HOME> nicht den Bildschirm löscht. Das Kommando setzt den Cursor 
nur in die linke obere Ecke des Monitors und läßt die Ausgabe von 
Zeile 20 und 30 auf dem Bildschirm stehen. Sie sind auch in der 
Lage, ein vertikales TAB zu erzeugen, indem Sie eine leere PRINT- 
Anweisung in Zeile 50 dazu benutzen, den Text in die vertikale 
Position 20 auf den Bildschirm zu bringen. Der restliche Text auf 
dem Bildschirm wurde dabei nicht gelöscht. Lassen Sie uns jetzt 
ein bißchen mit den Kommandos spielen. Hier ist ein kleines Pro- 
gramm, das Ihnen zeigt, wie Sie im Programm Text plazieren kön- 
nen. 


10 PRINT "<CLR/HOME>":FOR I = 1 TO 4:PRINT:NEXT 

20 INPUT "BITTE NACHRICHT EINGEBEN -->";MS$S 

30 PRINT:INPUT "HORIZONTALER PLATZ (1-40) ->";H 

40 PRINT:INPUT "VERTIKALER PLATZ (1-25) ->";V 

50 PRINT "<CLR/HOME>" 

60 FOR VER = 1 TO V:PRINT:NEXT VER:PRINT TAB(H);MS$S 

70 PRINT:PRINT "UM FORTZUFAHREN, IRGENDEINE TASTE DRÜCKEN" 


75 PRINT "ZUM BEENDEN E-TASTE DRÜCKEN "7 
80 GET A$S:IF AS = "" THEN 80 

90 IF AS <> "E" THEN 10 

100 END 


Wie Sie sehen, können Sie zur Textformatierung auch Variablen 
verwenden. TAB(H) wird gelesen wie TAB(10) oder TAB(15) oder TAB 
einer beliebigen anderen Ziffer zwischen 1 und 40. Was, denken 
Sie, passiert in dem oben gezeigten Programm, wenn Sie einen 
String an der 39sten horizontalen und der 25sten vertikalen Posi- 
tion eingeben? Da der maximale TAB 40 ist und die maximale verti- 
kale Position 25, wird der Text über den Rand hinausgehen. Pro- 
bieren Sie es selbst aus, um zu sehen, was passiert. Es wäre gut, 
die Grenzen von TAB und der vertikalen Position mit diesem Pro- 
gramm zu testen, um Klarheit über die Verwendung dieser Parameter 
zu bekommen. 
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5.2 Aufteilen von Strings 


Bis jetzt haben wir nur "ganze" Strings besprochen. Ohne Rück- 
sicht darauf, wie kurz oder lang diese Strings sind, bezeichnen 
wir sie als "ganze" Strings. Wenn wir zum Beispiel R$ als "GEHEN" 
definieren, können wir "GEHEN" als das gesamte R$ bezeichnen. 
Ebenso: wenn wir "DIES IST EIN LANGER STRING" ALS R$ definieren, 
ist "DIES IST EIN LANGER STRING" das gesamte R$. Hier ergibt sich 
die Möglichkeit, Teile des Strings einzeln zu benutzen oder ver- 
schiedene Strings zu einem zusammenzufassen. Wenn wir zu Daten- 
bankprogrammen kommen, werden wir dies als sehr notwendig erken- 
nen. Es gibt auch Anwendungen, bei denen wir die Länge eines 
Strings benötigen, einen numerischen Wert des Strings finden müs- 
sen und sogar Strings in numerische Variablen, und wieder zurück, 
umwandeln müssen. 


Glauben Sie mir! 


Ich gebe es nicht gerne zu, aber als ich zum ersten Mal von 
den Kommandos, die wir hier behandeln, hörte, dachte ich 
mir: "Welch eine Zeitverschwendung!" Es ist genug, das ein- 
fache Material durchzugehen, warum möchte da jemand auch 
noch Strings teilen und wieder zusammenfügen? Wenn man nur 
einen bestimmten Teil eines Strings benötigt, warum diesen 
nicht einzeln definieren? Und wenn man einen längeren 
String braucht, dann definiert man diesen eben einfach län- 
ger! Das waren meine Gedanken über die Stringformatierung. 
Ich bin jedoch zu der Überzeugung gelangt, daß ich es für 
sehr schwierig halte, mir ein Programm ohne diese lei- 
stungsfähigen Kommandos auch nur vorzustellen. Glauben sie 
mir! Kommandos zur Stringformatierung sind sehr wichtig 
und wenn Sie dies im Moment vielleicht noch nicht erkennen, 
werden Sie es sehen, wenn Sie bereits mehr Programme er- 
stellt haben. 
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Formatieren von Strings 


Wir werden den Abschnitt, Formatieren von Strings, in vier Teilen 
besprechen: 1) Errechnen der Länge eines Strings, 2) Finden von 
Teilen eines Strings, 3) Umwandeln von Text in Zahlen und wieder 
zurück und 4) Verbindung von Strings (Verkettung). 


Errechnen der Länge eines Strings 


Manchmal ist es wichtig, die Länge eines Strings zur Druckausgabe 
zu berechnen. Glücklicherweise besitzt Ihr COMMODORE-64 eine gute 
Möglichkeit, Ihnen die Länge eines einzelnen Strings mitzuteilen. 
Durch das Kommando PRINT LEN(AS), erhalten Sie die Anzahl der 
Zeichen, inclusive Leerstellen, die Ihr String enthält. Probieren 
Sie das folgende kleine Programm, um zu sehen, wie das Kommando 
arbeitet: 


10 PRINT "<CLR/HOME>" 

20 INPUT "BITTE TEXT EINGEBEN ->";A$ 

30 PRINT A$; " HAT" ;LEN(A$); " BUCHSTABEN" 
40 PRINT:PRINT "WEITER? (J/N) "; 

50 GET AN$:IF AN$S = "" THEN 50 

60 IF ANS = "J" THEN 20 


Um eine weitere Anwendung kennenzulernen, sehen wir uns eine ab- 
geänderte Version der Zentrierroutine aus dem letzten Kapitel an: 


10 PRINT "<CLR/HOME>" 

20 PRINT "GEBEN SIE BITTE EINEN TEXT MIT BIS ZU 40 ZEICHEN 
EIN":INPUT "-> ";SS 

30 PRINT "<CLR/HOME>" 

40 L = 20 - LEN(S$) / 2:PRINT TAB(L);S$S 

50 FOR I=1 TO 20:PRINT:NEXT 

55 PRINT "WEITER MIT BELIEBIGER EINGABE - ENDE = E-TASTE"; 
60 GET AS:IF AS = "" THEN 60 

70 IF AS <> "E" THEN 10 

80 END 
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Wir können jetzt versuchen, die Eingabe mit dem LEN-Kommando zu 


steuern, 


um zu sehen, wie wir die Länge eines Strings errechnen 


und damit die TAB-Anweisung beeinflussen. Stellen Sie sich vor, 
Sie möchten ein Programm schreiben, das Adreßaufkleber druckt, 
die alle nur 30 Zeichen lang sind. Vorher möchten Sie sich verge- 


wissern, 


daß Ihre Eingaben 30 Zeichen ( incl. Leerzeichen) nicht 


überschreiten. Wir schreiben dazu ein Programm, das die Länge 
eines Strings prüft, bevor dieser akzeptiert wird. 


10 
20 


PRINT "<CLR/HOME>" 
PRINT "BITTE EINEN NAMEN MIT MAX. 30 STELLEN EINGEBEN - 


LEERSTELLEN ZÄHLEN MIT" 


30 
40 
50 
60 
70 
80 
90 


INPUT "KEINE KOMMAS VERWENDEN ->";NAS 

IF LEN(NAS) > 30 THEN GOTO 100:REM PRÜFUNG 
PRINT:PRINT NAS 

PRINT:PRINT "WEITEREN NAMEN? (J/N) "; 


GET ANS:IF ANS = "" THEN 70 
IF ANS <> "J" THEN END 
GOTO 10 


100 PRINT "<CLR/HOME>" 
110 PRINT "SIE HABEN MEHR ALS 30 ZEICHEN EINGEGEBEN" 
120 PRINT:GOTO 20 
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Verstoßen Sie nun gegen die Anweisung in Zeile 20. Geben Sie ei- 
nen String ein, der länger als 30 Zeichen ist und sehen Sie was 
passiert. (Wenn Ihr Computer das nicht mag, können Sie das Pro- 
gramm jederzeit neu starten. Dies sollte Sie nur daran erinnern.) 
Wurde das Programm richtig übernommen, bekommen Sie bei der Ein- 
gabe von mehr als 30 Zeichen pro String eine Meldung vom Pro- 
gramm. 


In den Beispielen oben sehen Sie, wie das LEN-Kommando verschie- 
den eingesetzt werden kann. Es gibt noch viele andere Anwendungen 
dieses Kommandos z.B. die zur Reduzierung der Laufzeit des Pro- 
gramms dienen und die Informationen berechnen. Um den Nutzen die- 
ser Kommandos zu verstehen, muß man damit experimentieren und 
beobachten, wie andere Programmierer sie einsetzen. 


Finden der mittleren (MID$), linken (LEFT$) und 
rechten (RIGHT$) Teile eines Strings 


Stellen Sie sich vor, Sie möchten eine einzige Variable benutzen, 
um drei verschiedene Zustände, wie z.B. SCHLECHT, GUT, AUSGE- 
ZEICHNET, zu beschreiben, aber nur Teile davon ausgeben. Durch 
Verwendung von MID$S, LEFT$S und RIGHT$ ist es möglich, nur den 
Teil des Strings auszugeben, den Sie brauchen. Zum Beispiel be- 
nutzen wir im nächsten Programm einen String, um drei verschie- 
dene Zustände darzustellen: 


10 PRINT "<CLR/HOME>" 
20 X$5 = "SCHLECHT GUT AUSGEZEICHNET" 
30 PRINT "WIE GEHT ES IHNEN HEUTE? (<S>CHLECHT, <G>UT ODER 


<A>USGEZEICHNET) "; 
40 GET FS$:IF F$ = "" THEN 40 
50 IF F$ = "S" THEN PRINT LEFTS$S(XS$S,8) 


60 IF F$ = "G" THEN PRINT MID$(X$,10,3) 
70 IF F$ = "A" THEN PRINT RIGHTS (X$,13) 
80 PRINT:PRINT:PRINT "NOCHMAL? (J/N) "; 
90 GET AN$: IF AN$ = "" THEN 90 

100 IF ANS = "J" THEN 10 


Lassen Sie uns festhalten, daß es leichter wäre, einfach zur Aus- 


gabe von 'SCHLECHT','GUT' und "AUSGEZEICHNET' zu verzweigen, und 
es wäre ebenso effizient. Wir wollten jedoch nur der Übung halber 
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dieses Beispiel machen und nicht, um die Programmorganisation zu 
optimieren. Lassen Sie uns sehen, was die neuen Kommandos durch- 
führen. 


KOMMANDO BEDEUTUNG 


MIDS (AS,N,L) Findet den Teil von A$, beginnend beim Zei- 
chen N, in der Länge von L Zeichen. 

LEFTS$ (A$,L) Findet den Teil von A$ L Zeichen lang, begin- 
nend an der linken Seite des Strings. 

RIGHTS (A$,L) Findet den Teil von A$ L Zeichen lang, begin- 
nend an der rechten Seite des Strings. 


Um Ihnen sofort etwas Erfahrung mit diesen neuen Kommandos zu er- 
möglichen, probieren Sie folgendes: 


WS "WAS FÜR EIN ELEND":PRINT LEFT$(W$,3) <RETURN> 
GS = "ABSTAMMUNG" :PRINT MIDS$(G$,3,5) <RETURN> 

= "KEIN PLATZ FÜR TIERE":PRINT RIGHTS (X$,19) :PRINT RIGHTS 
(xX$,4) + MIDS(X$,16,4) <RETURN> 


Ein weiterer Trick mit Teilstrings ist die Zuweisung eines Teils 
des Strings zu einem anderen String. Zum Beispiel: 


10 PRINT "<CLR/HOME>" 

20 BIG$S = "LANG LANG HER UND WEIT WEIT WEG" 

30 LIT$ = MID$(BIG$,12,2) 

40 AWYS RIGHT$ (BIG$S,4) 

50 LGE$ = LEFTS$(BIG$,4) 

60 PRINT:PRINT:PRINT LGE$;LITS + "" + AWYS 

70 REM VOR DEM LAUFENLASSEN BITTE VERSUCHEN, DEN NEUEN TEXT 
HERAUSZUFINDEN 


Probieren Sie folgendes Programm, um einen interessanten Effekt 
zu erzielen: 


10 PRINT "<CLR/HOME>":FOR I =1 TO 10:PRINT:NEXT 

20 INPUT "IHR NAME -->";NAS 

30 FOR I = LEN (NAS$S) TO 1 STEP -1:PRINT MID$S (NAS,I,1);: 
NEXT I | 

40 FOR I = 1 TO 1500:NEXT I:REM ANHALTEN DER ANZEIGE (PAUSE) 
45 REM *%*ZEILE 50 BENUTZT <CLR/HOME> OHNE <SHIFT> 
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46 REM **BEACHTEN SIE DIE WIRKUNGSWEISE DER VERTIKALEN 
CURSORBEWEGUNG 

47 REM **IN ZUSAMMENHANG MIT DER SCHLEIFE 

50 PRINT "<HOME>":FOR V = 1 TO 11:PRINT:NEXT V 

55 REM **DIE K-SCHLEIFE IN ZEILE 60 DIENT DER VERLANGSAMUNG 
60 FOR I = 1 TO LEN(NAS):PRINT MIDS(NAS,I,1);:FOR K = 1 TO 
60:NEXT K:NEXT I 

70 FOR VT = 1 TO 5:PRINT:NEXT VT:PRINT TAB(5); "WOLLEN SIE 
WEITERMACHEN? (J/N) "; 

80 GET ANS:IF ANS = "" THEN 80 

90 IF ANS = "J" THEN 10 


Sie haben sich vielleicht gewundert, wie Ihr Computer es schafft, 
Namen rückwärts auszugeben. Nun, jetzt wissen Sie es! (Wenn Ihr 
Name OTTO ist, haben Sie es gar nicht bemerkt - probieren Sie 
deshalb OTTOKAR.) Das Programm führte aber auch noch andere Dinge 
durch: als erstes demonstrierten wir, wie Teilstrings und Schlei- 
fen zusammen benutzt werden können, um die Ausgabe zu formatie- 
ren. Zweitens zeigten wir, wie wir die Ausgabe verlangsamen kön- 
nen, um entweder einen interessanten Effekt zu erzielen oder dem 
Anwender Zeit zur Beobachtung zu geben. 
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Da wir gerade beim Thema Geschwindigkeit sind, lernen wir gleich, 
wie wir die Uhr des COMMODORE-64 benutzen können. Erinnern Sie 
sich an den Hinweis, daß TI$S eine "reservierte Variable" ist. 
Jetzt sehen wir warum. Probieren Sie folgendes im Kommandomodus: 


TI$ = "101030" <RETURN> 
Warten Sie ein paar Sekunden und geben Sie ein: 
PRINT TI$S <RETURN> 


Der eingegebene Wert von TI$ hat sich verändert! Haben Sie nur 
ein paar Sekunden gewartet, wurde aus 101030 101050 oder irgend 
etwas in diesem Bereich. Um zu sehen, was passiert, lassen Sie 
uns die Zahl in Stunden, Minuten und Sekunden teilen. 


10 10 30 = 10 Uhr 10 Minuten 30 Sekunden. 


Bei einer normalen Uhr würden wir sagen, es ist 10:10 und 30 Se- 
kunden. Nun, TI$ macht das gleiche. Es zählt die Sekunden, dann 
die Minuten und zuletzt die Stunden. Um dies besser zu sehen, 
schreiben wir ein kleines Programm dafür. 


10 PRINT"<CLR/HOME>":PRINT "COMMODORE-64 UHR" 

20 FOR I = 1 TO 4:PRINT:NEXT:PRINT "GEBEN SIE DIE ZEIT EIN 
(00 STD 00 MIN 00 SEC)" 

30 INPUT TI$ 

40 PRINT "<CLR/HOME>" 

50 PRINT "<HOME>":FOR I = 1 TO 10:PRINT:NEXT:PRINT 
"COMMODORE ZEIT --> ";TIS:GOTO 50 


Wenn Sie dieses Programm laufen lassen, vergewissern sie sich, 
daß Sie alle sechs Einheiten für Stunde, Minute und Sekunde 
eingegeben haben. Zum Beispiel bei 8:14 geben Sie 081400 ein und 
nicht nur 814. 


Außer für die Ausgabe der Uhrzeit auf dem Bildschirm können Sie 
TI$ auch als Zeitauslöser im Programm verwenden. Sie weisen der 
Variablen TI$ zuerst einen Wert zu und fragen diesen im Programm 
ab. Sie können so die Zeit bis zur Eingabe einer Antwort messen. 
Das folgende kleine Mathematikprogramm enthält auch ein Beispiel 
zur Zeitmessung: 
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10 PRINT "<CLR/HOME>" 

15 FOR I = 1 TO 5:PRINT:NEXT: TI$ = "000000" 
20 INPUT "BITTE EINE ZAHL EINGEBEN ->";A 

30 INPUT "NOCH EINE ZAHL ->":B 

40 PRINT:PRINT "WAS IST ";A;" + ";B;" " 

50 INPUT C 

60 IF A+ B <> C THEN 200 

70 IF TIS > "000010" THEN GOTO 100 

80 PRINT:PRINT "RICHTIG!!!!" 

85 FOR X=1 TO 1000:NEXT:GOTO 10 

100 PRINT "<CLR/HOME>":PRINT:PRINT "ZEIT ABGELAUFEN!" 
110 FOR TM = 1 TO 1000:NEXT TM:GOTO 10 

200 PRINT "DAS IST NICHT GANZ RICHTIG" 

210 INPUT "BITTE <RETURN> DRÜCKEN"; CR 

220 GOTO 10 


Gehen Sie das Programm aufmerksam durch. Beachten Sie, wie in 
Zeile 70 die Zeit geprüft wird und wie diese auf "000000" zurück- 
gesetzt wird, wenn das Programm neu durchlaufen wird. 


Umwandeln von Text in Zahlen und wieder zurück 


Wir lernen jetzt Strings in Zahlen, und Zahlen in Strings zu ver- 
wandeln. Vielleicht denken Sie wie ich, als ich zum ersten Mal 
von diesen Kommandos hörte: das ist doch ziemlich überflüssig. 
Das gilt aber nur, wenn Sie Strings als Stringvariablen und Zah- 
len als numerische Variablen benutzen möchten. Wenn Sie jedoch 
einmal ihren Wert erkannt haben, werden Sie sich wundern, wie Sie 
jemals ohne diese Kommandos ausgekommen sind. Probieren Sie fol- 
gendes Programm: 


10 PRINT "<CLR/HOME>" 

20 FOR I = 1 TO 5:READ NAS(I) :NEXT I 

30 FOR I = 1 TO5 

40 X(I) = VAL(RIGHT$ (NAS(I),1)) 

50 NEXT I 

60 FOR I = 1 TO5 

65 PRINT "AUFGELAUFENE ZAHLUNGEN = DM";X(I)*(1.5%*7) 

67 NEXT I 

70 DATA SMITH 7, JONES 8, MCKNAP 6, JOHNSON 2, KELLY 3 
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Unter Verwendung von DATA-Zeilen, die zuerst im Stringformat ge- 
speichert waren, gelang es uns, Teile dieser Tabellenelemente in 
numerische Tabellenelemente umzuwandeln. Nachdem wir diese Kon- 
vertierung durchgeführt haben, konnten wir unsere mathematischen 
Operationen in Zeile 60 dazu benutzen, die aufgelaufene Summe zu 
errechnen, die jemand bei einer Auszahlung von 7 DM pro Stunde 
eineinhalbfach bekommt. Nun, das ist gut, sehr interssant, aber 
wir haben nun keine Liste, wer wieviel bekam und wie hoch die 
Gesamtsumme war. Warum probieren Sie das nicht allein? Ändern Sie 
das Programm so ab, daß der Name jedes Arbeitnehmers erscheint, 
mit der ausbezahlten Summe dahinter und der Gesamtsumme aller 
Beträge. (Tip: Sie suchen den Teilstring LEFT$(NAS(I),LEN 
(NAS(I))-2) da Sie die Zahl und die Leerstelle hinter jedem Namen 
brauchen.) 


Es ist immer sehr hilfreich, mit den neuen Kommandos sofort eini- 
ge Übungen durchzuführen, um sicherer zu werden. Probieren Sie: 


AS "123":PRINT VAL(A$S) + 11 <RETURN> 

Q$ = "99.5":PRINT VAL(Q$)*7 <RETURN> 

VKS = "44.95":PRINT "VERKAUFT ZUM HALBEN PREIS DM"; 
VAL(VK$)/2 <RETURN> 

DO$ = "$103.88) :DN$S = "$1834":PRINT VAL(RIGHT$S(DO$,6)) 
+ VAL(RIGHTS$S(DN$,5)) <RETURN> 


Hinweis: Wenn Sie das kleine Beispiel auf Band oder Diskette si- 
chern möchten, schreiben Sie nur die Zeilennummern vorne dazu und 
speichern Sie es dann ab. 


Von Zahlen zu Strings 


Also, machen wir das ganze jetzt anders herum. Sie haben gesehen, 
warum wir Strings zu Zahlen machen; wozu aber Zahlen in Strings 
umwandeln? Für die Konvertierung benutzen wir das STR$ Kommando. 
Sehen Sie sich als Beispiel das folgende Programm an: 


10 PRINT "<CLR/HOME>" 

20 PRINT "GEBEN SIE EINE ZAHL MIT 5 STELLEN " 
30 INPUT "HINTER DEM DEZIMALPUNKT EIN: ";A 
40 AS = STRS(A) 

50 PRINT:PRINT LEFTS$S(A$,4) 
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Wie Sie sehen, haben Sie damit die Zahl auf drei Zeichen, inclu- 
sive Dezimalpunkt, gekürzt. Ändern Sie in Zeile 40 LEFT$ in 
RIGHTS, und Sie erhalten die 4 (nicht 3) äußerst rechten Zeichen 
des Strings. In Wirklichkeit gibt Ihnen LEFT$ ebenfalls 4 Zei- 
chen, aber das Zeichen ganz links ist für das positive oder ne- 
gative Vorzeichen einer Zahl reserviert. Üben wir noch einige 
Beispiele im Kommandomodus, um eine bessere Vorstellung zu bekom- 
men, und lassen Sie uns anschließend noch etwas Praktischeres ma- 
chen. 


A 5.00:A$ STR$ (A) :PRINT AS <RETURN> 

V = 2345:V$ = STR$S(V) :PRINT V$ <RETURN> 

GELD = 22.36:GELD$ = STRING$ (GELD) :PRINT LEFT$ (GELD$,2) 
<RETURN> 


Erinnern Sie sich an diese Kommandos, wenn Sie mit Dezimalstellen 
arbeiten. Sie werden sich als sehr nützlich erweisen. 
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Verbinden von Strings: Verkettung 


Sie haben gesehen, wie Sie Teile eines Strings nehmen und auf 
dem Bildschirm ausgeben können. Nun werden wir Strings miteinan- 
der verbinden. Diese Funktion heißt VERKETTUNG. Sie wird möglich 
durch Benutzung des "+" Zeichens in Verbindung mit dem String. 
Beispiel: 


10 PRINT "<CLR/HOME>" 

20 INPUT "IHR NACHNAME ->";NNS 
30 INPUT "IHR VORNAME ->";VNS 
40 NAS = VNS$S + NNS 

50 PRINT NAS 


Ein bißchen verwirrend, was? Sie haben jedoch gesehen, wie NNS$S 
und VN$ zu einem langen String zusammengefaßt wurden. Ändern Sie 
nun Zeile 40 folgendermaßen: 


40 NAS = VNS + " " + NNS 


Wenn Sie jetzt RUN eingeben, erscheint Ihr Name richtig auf dem 
Bildschirm. Wir haben nicht nur Stringvariablen verknüpft, son- 
dern auch Strings hinzugefügt. Es ist zum Beispiel ganz in Ord- 
nung, folgendes zu machen: 


PRINT "EINS" + "EINS" <RETURN> 


Sie können mit EINSEINS nicht viel anfangen, sehen aber gut das 
Prinzip der Verkettung. 
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Ein Problem bei der Formatierung von Zahlen mit dem COMMODORE-64 
ist das Abtrennen von Nullen am Ende. Probieren Sie folgendes: 


PRINT 19.80 
PRINT 5.00 


Bei einer Verarbeitung mit Mark und Pfennig kann Ihnen dies eini- 
ge Kopfschmerzen bereiten und es sieht nicht gerade gut aus. Se- 
hen wir also, wie wir dieses Problem mit unseren STRS- und VAL- 
Kommandos beheben können. 


10 PRINT "<CLR/HOME>" 

20 PRINT "BITTE NUR PFENNIGBETRÄGE EINGEBEN! ":PRINT:PRINT 
30 INPUT "WIEVIEL PF HABEN SIE AUSGEGEBEN?" ;PF 

40 T=T + PF 

50 TS = STR$(T) 


60 TS = "000" + T$S:REM DIES DIENT ZUR VERGEWISSERUNG DASS 
LEN(TS$) LANG GENUG IST 

70 IF MID$S(TS$S,(LEN(TS)-1),1) = "." THEN T$ = T$ + "0":GOTO 
90 

80 IF MIDS$S(TS,(LEN(TS)-2),1) <> "." THEN TS = TS + ".00" 

90 PRINT:PRINT:PRINT "SIE HABEN JETZT "; RIGHT$(T$,LEN(TS)- 


3); "DM AUSGEGEBEN" 
100 PRINT "DRÜCKEN SIE EINE TASTE UM FORTZUFAHREN ODER 'E' 


FÜR ENDE"; 

110 GET R$S:IF RS = "" THEN 110 
120 IF R$ = "E" THEN END 

130 GOTO 10 


Dies sieht vielleicht etwas schwierig aus. Lassen Sie uns das 
Beispiel daher im einzelnen durchgehen: 


1. Sie geben in Zeile 30 numerische Variablen ein und er- 
rechnen in Zeile 40 ihre Summe. 


2: Die Summe, dargestellt durch die Variable T, wird dann 
in Zeile 50 in die Variable T$ umgewandelt. 


3% In Zeile 60 "erweitern" Sie TS durch 3 Nullen, um eine 
minimale Länge für Zeile 70 und 80 zu bekommen. 


4. Zeile 70 errechnet das vorletzte Zeichen in T$S. Wenn 


dieses Zeichen ein Dezimalpunkt (.) ist, wissen Sie, 
daß die zweite Dezimalstelle abgetrennt wurde. (z.B. 
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5.4, 19.5, usw.). Sie hängen also eine Null hinten an 
und springen zu Zeile 90. 


54 Zeile 80 errechnet das dritte Zeichen von hinten und 
wenn dies kein Dezimalpunkt (.) ist, wissen Sie, daß 
alle Dezimalstellen abgetrennt wurden und es sich um 
einen reinen DM-Betrag handelt. Sie hängen also den De- 
zimalpunkt und zwei Nullen an (.00). 


6. In Zeile 90 geben Sie schließlich die Ergebnisse aus, 
nachdem Sie die Erweiterung von Zeile 60 (000) unter 
Verwendung von RIGHT$ wieder abgetrennt haben. Die For- 
mulierung '"LEN(T$S)-3' errechnet die Länge von T$ und 
drei Stellen - die nicht gewünschten drei Nullen. 


Das Ganze erscheint vielleicht als eine etwas komplizierte Metho- 
de, um unsere Nullen in die Dezimalstellen zurückzubekommen, aber 
in Wirklichkeit erstreckt sich der ganze Prozeß nur über fünf 
Zeilen (50 bis 90). Speichern Sie das Programm ab. Wenn Sie diese 
Anwendung in einer Ausgabe brauchen, fügen Sie nur diese Zeilen 
ein! (Vorsicht, die Subtraktion läuft nicht glatt ab, wenn Sie 
unter DM 1 kommen!). 


5.3 Organisieren der Eingabedaten 


Da Sie jetzt zahlreiche Kommandos fest im Griff haben, können Sie 
ernsthaft an die Organisation Ihrer Programme denken. Erstens 
müssen Sie Ihre Eingaberoutine in einer Weise arrangieren, daß 
Sie selbst und auch andere den Überblick nicht verlieren. Dies 
schließt das Anlegen von Blöcken im Programm und die Überlegung 
mit ein, welche Variablen und Tabellen Sie benutzen möchten. 
Ebenso möchten Sie sich bei der Dateneingabe vergewissern, daß 
Sie den richtigen Datentyp eingeben. Sie prüfen deshalb jede Ein- 
gabe anhand der Parameter daraufhin, daß die gewünschte Länge 
oder der Wert nicht überschritten werden. Sehen wir uns ein Bei- 
spiel an, wie die Strings alle in einer Länge einzugeben (nicht 
länger und nicht kürzer) sind. Wir haben bereits besprochen, wie 
wir die Länge auf ein Minimum festlegen. Der letzgenannte Prozeß 
wird auch als "padding" bezeichnet. 
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10 PRINT "<CLR/HOME>" 

20 FOR I = 1 TO 8:PRINT:NEXT I 
25 INPUT "IHRE FIRMA ->";CMS$S 
30 IF LEN(CM$) < 10 THEN 70 

40 IF LEN(CM$) > 10 THEN PRINT "BITTE NICHT MEHR ALS 10 ZEICH 
EN EINGEBEN ":REM PRÜFUNG AUF ZU LANGE EINGABE 

42 REM DRÜCKEN SIE <CTRL> UND <9> GLEICHZEITIG IN ZEILE 45 
45 PRINT:PRINT "<CTRL><9> DRÜCKEN SIE BITTE EINE TASTE ->; 


50 GET AS$S:IF AS = "" THEN 50 

60 GOTO 10 

70 IF LEN(CM$S) < 10 THEN CM$S = CMS + "X":GOTO 70:REM 
ANFÜGEN 


80 PRINT "<CLR/HOME>" 

90 FOR I = 1 TO 8:PRINT:NEXT 

95 PRINT "DER COMPUTER HAT ENTSCHIEDEN, DASS " 

99 PRINT CM$; " IHNEN EINE GEHALTSERHÖHUNG GEBEN SOLLTE!" 


Wenn IHRE FIRMA <CMS> nun kleiner als 10 Zeichen ist, werden Sie 
einige "X" am Ende des Namens sehen. Wir haben dies gemacht, da- 
mit Sie sehen, wie die Verknüpfung arbeitet. Tauschen Sie nun in 
Zeile 70 das "X" durch ein Leerzeichen "" aus und sehen Sie, was 
passiert. Wenn Sie nun das Programm zum zweitenmal laufen lassen, 
merken Sie, daß einem Firmennamen, der kürzer als 10 Zeichen ist, 
mehrere Leerzeichen angehängt sind. Um diese Leerzeichen zu ent- 
fernen, geben Sie ein: 


75 IF MIDS(CMS,LEN(CMS) ,1) = " " THEN CM$ = LEFT$(CM$, (LEN 
(CMS) -1) :GOTO 75 


5.4 Organisieren der Datenverarbeitung 


Der nächste größere Schritt nach der Formatierung der Eingabe ist 
die Durchführung von Berechnungen mit den Daten. Sie werden 
hauptsächlich mit zwei Arten von Daten arbeiten: 


1. NUMERISCH - Verarbeitung von numerischen Daten mit 
mathematischen Operationen 


2. STRINGS - Verarbeitung von Zeichenketten mit vVerknüp- 
fungs- und Teilkettenkommandos. 
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Die meisten Stringverarbeitungen dienen der Formatierung der Ein- 
und Ausgabe. Wir werden daher die Formatierung numerischer Daten 
bevorzugt behandeln. Wir gehen hier ein einfaches Beispiel durch, 
in dem drei Verarbeitungen durchgeführt werden: (1) Additionen, 
(2) Subtraktionen und (3) fortlaufender Saldo. Es handelt sich um 
unser Scheckbuchprogramm aus früheren Kapiteln. 


10 
20 
30 
32 
40 
42 
50 
52 
55 
60 
62 
70 
80 
90 


100 
110 
112 
120 
130 
140 
150 
160 
170 
180 
190 
192 
200 
210 
212 
220 


PRINT "<CLR/HOME>" 
REM ### BEGINN DES EINGABE- UND ÜBERSCHRIFTENBLOCKS 
CB$ = " = COMPUTER - SCHECKBUCH = ":L = 20 - LEN(CB$)/2 
PRINT TAB(L); "<CTRL><9>";CB$S:REM = ÜBERSCHRIFT = 
FOR I = 1 TO 4:PRINT:NEXT 
INPUT "GEBEN SIE DEN GEGENWÄRTIGEN SALDO EIN - DM ";BA 
PRINT:PRINT:PRINT "1. EINLAGEN EINGEBEN ":PRINT 
PRINT "2. SCHECKS ABZIEHEN " 
PRINT:PRINT "3. PROGRAMMENDE" 
FOR I = 1 TO 7:PRINT:NEXT 
PRINT "<CTRL><9> VERARBEITUNG AUSWÄHLEN ";:INPUT A 
ON A GOTO 100,200,400 
GOTO 60:REM PRÜFUNG 
REM ENDE DES EINGABEBLOCKS 
REM ### DATENVERARBEITUNGSROUTINE NR. 1 ### 
PRINT "<CLR/HOME>" 
FOR I = 1 TO 6:PRINT:NEXT:INPUT "EINLAGE DM" ;DP 
BA = BA + DP:REM SALDO ERMITTELM 
PRINT:PRINT "SIE HABEN NUN DM";BA; " AUF DEM KONTO" 
PRINT: INPUT "<CTRL><9>WEITERE EINLAGEN? (J/N) ";ANS 
IF ANS = "J" THEN 110 
PRINT: INPUT "HABEN SIE SCHECKS ZUM VERBUCHEN? (J/N)";ANS 
IF ANS = "N" THEN GOTO 400 
IF AN$S = "J" THEN GOTO 200 
PRINT "<CLR/HOME>" 
GOTO 160:REM PRÜFUNG UND ENDE ROUTINE 1 
REM ### DATENVERARBEITUNGSROUTINE NR. 2 ### 
PRINT "<CLR/HOME>":FOR I = 1 TO 6:PRINT:NEXT 
INPUT "BITTE SCHECKBETRAG EINGEBEN DM" ;CK 
BA = BA - CK:REM SALDO ERMITTELN 


230 PRINT:PRINT "SIE HABEN NUN DM";BA;" AUF IHREM KONTO" 
240 PRINT:INPUT "WEITERE SCHECKS? (J/N) - 'E' ENDE ";ANS 


250 
260 


270 


IF ANS = "J" THEN 210 
IF ANS = "E" THEN 400 
PRINT:INPUT "IRGENDWELCHE EINLAGEN? (J/N) ";ADS 


280 IF ADS = "J" THEN 100 


290 


GOTO 240:REM PRÜFUNG UND ENDE ROUTINE 2 
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400 REM ### ENDEVERARBEITUNG ### 
410 PRINT "<CLR/HOME>":FOR I = 1 TO 400:PRINT "DM ";:NEXT 
420 PRINT "IHR NEUESTER KONTOSTAND BETRÄGT DM";BA 


Dieses Programm wurde entworfen, um an einem Beispiel zu zeigen, 
wie man die Verarbeitung der Daten in sinnvolle Blöcke teilt. Mit 
der Datenausgabe gibt es jedoch noch einige Probleme. Wir bekom- 
men nämlich keine Nullen am Ende des Saldos! Dies ist ein Ausga- 
beproblem, das wir im folgenden Abschnitt besprechen werden. Be- 
vor wir aber fortfahren, sehen Sie bitte, ob Sie verstanden ha- 
ben, wie wir die Verarbeitung der Daten in Blöcke geteilt haben. 
Wir haben nur drei Variablen benutzt: 


BA = SALDO 
CK = SCHECK 
DP = EINLAGE 


Bei der Verrechnung eines Schecks haben wir CH von BA subtra- 
hiert. Bei der Eingabe einer Einlage haben wir DP zu BA addiert. 
So konnten wir immer einen fortlaufenden Saldo führen, und am 
Ende der Verarbeitung stellte BA den endgültigen Saldo dar. Durch 
das Einhalten der Blöcke waren wir in der Lage, im Programm zu 
springen und es dennoch geradlinig zu durchlaufen. 


5.5 Organisation der Ausgabe 


Lassen Sie uns zum Programm zurückkehren und es so verändern, daß 
unser Saldo die gewohnten Nullen aufweist. Dies ist hauptsächlich 
ein Problem der Ausgabe, nachdem alle Berechnungen zu diesem 
Zeitpunkt bereits erfolgt sind. Wir müssen jedoch nicht bei jeder 
Ausgabe des fortlaufenden Saldos die entsprechenden Zeilen für 
die Konvertierung des Saldos in eine Stringvariable eingeben. Wir 
geben diese Zeilen in einen Block, den wir bei Bedarf durchlau- 
fen. Wenn Sie sich das Programm COMPUTER-SCHECKBUCH ansehen, 
stellen Sie fest, daß Sie ab Zeile 300 noch einen Block einfügen 
können. Benutzen Sie folgenden Block, um die Ausgabe zu formatie- 
ren: 


300 REM ### FORMATIEREN DER AUSGABE ### 


310 BA = BA + .001:PLACE = 1:BAS = STRS (BA) 
312 IF BA < .001 THEN BAS = "0.00":GOTO 340 
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320 IF MIDS(BAS,PLACE,1) <> "." THEN PLACE = PLACE + 1:GO0TO 
320 

330 BA$S = LEFTS(BA$,PLACE + 2) 

340 . RETURN 


350 REM ENDE DES AUSGABEBLOCKS 


Wir ändern jetzt nur ein paar Zeilen in unserem Programm. Jedes- 
mal wenn der Saldo ausgegeben werden soll, springen wir zu der 
Unterroutine in Zeile 300 und mit RETURN zurück zu der Ausgabe 
von BA$S. Die folgenden Zeilen unseres COMPUTER-SCHECKBUCHS soll- 
ten geändert und/oder hinzugefügt werden: 


125 GOSUB 300 

130 PRINT:PRINT 

132 PRINT "SIE HABEN NUN ";BAS; "DM AUF IHREM KONTO" 
225 GOSUB 300 

230 PRINT "SIE HABEN NUN ";BAS; "DM AUF IHREM KONTO" 
415 GOSUB 300 

420 PRINT "SALDO DM ";BAS 


Haben Sie alles richtig eingegeben, steht Ihnen jetzt ein handli- 
ches, kleines Programm zur Führung Ihres Kontos zu Verfügung. Zur 
Überprüfung, ob alles vollständig ist, folgt anschließend noch 
einmal das gesamte Programm mit allen Unterroutinen und Änderun- 
gen, die wir durchgeführt haben: 


10 PRINT "<CLR/HOME>" 

20 REM ### BEGINN DES EINGABE- UND ÜBERSCHRIFTENBLOCKS 

30 CBS$S = " = COMPUTER - SCHECKBUCH = ":L = 20 - LEN(CBS$S)/2 
32 PRINT TAB(L); "<CTRL><9>";CBS;REM = ÜBERSCHRIFT = 

40 FOR I = 1 TO 4:PRINT:NEXT 

42 INPUT "GEBEN SIE DEN GEGENWÄRTIGEN SALDO EIN - DM ";BA 
50 PRINT:PRINT:PRINT "1. EINLAGEN EINGEBEN ":PRINT 

52 PRINT "2. SCHECKS ABZIEHEN " 

55 PRINT:PRINT "3. PROGRAMMENDE" 

60 FOR I = 1 TO 7:PRINT:NEXT 

62 PRINT "<CTRL><9> VERARBEITUNG AUSWÄHLEN ";:INPUT A 

70 ON A GOTO 100,200,400 

80 GOTO 60:REM PRÜFUNG 

90 REM ENDE DES EINGABEBLOCKS 

100 REM ### DATENVERARBEITUNGSROUTINE NR. 1 ### 

110 PRINT "<CLR/HOME>" 

112 FOR I = 1 TO 6:PRINT:NEXT:INPUT "EINLAGE DM" ;DP 

120 BA = BA + DP:REM SALDO ERMITTELM 
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GOSUB 300 

PRINT:PRINT 

PRINT "SIE HABEN NUN ";BA$; "DM AUF IHREM KONTO" 
PRINT: INPUT "<CTRL><9>WEITERE EINLAGEN? (J/N) ";ANS 
IF AN$ = "J" THEN 110 

PRINT:INPUT "HABEN SIE SCHECKS ZUM VERBUCHEN? (J/N)";AN$ 
IF AN$ = "N" THEN GOTO 400 

IF AN$ = "J" THEN GOTO 200 

PRINT "<CLR/HOME>" | 

GOTO 160:REM PRÜFUNG UND ENDE ROUTINE 1 

REM ### DATENVERARBEITUNGSROUTINE NR. 2 ### 

PRINT "<CLR/HOME>":FOR I = 1 TO 6:PRINT:NEXT 

INPUT "BITTE SCHECKBETRAG EINGEBEN DM" ;CK 

BA = BA - CK:REM SALDO ERMITTELN 


GOSUB 300 
PRINT "SIE HABEN NUN ";BAS; "DM AUF IHREM KONTO" 
PRINT:PRINT "WEITERE SCHECKS? (J/N) - 'E' ENDE ";ANS 


IF ANS = "J" THEN 210 

IF ANS = "E" THEN 400 

PRINT:INPUT "IRGENDWELCHE EINLAGEN? (J/N) ";ADS$S 
IF ADS = "J" THEN 100 

GOTO 240:REM PRÜFUNG UND ENDE ROUTINE 2 

REM ### FORMATIEREN DER AUSGABE ### 

BA = BA + .001:PLACE = 1:BAS = STR$(BA) 

IF BA < .001 THEN BAS$S = "0.00":GOTO 340 


IF MID$S(BAS$S,PLACE,1) <> "." THEN PLACE = PLACE + 1:GOTO 
320 

BA$S = LEFTS(BA$,PLACE + 2) 

RETURN 


REM ENDE DES AUSGABEBLOCKS 

REM ### ENDEVERARBEITUNG ### 

PRINT "<CLR/HOME>":FOR I = 1 TO 400:PRINT "DM ";:NEXT 
GOSUB 300 

PRINT "SALDO DM ";BAS$ 


5.6 Rollen des Bildschirms 


Ein Problem der Ausgabe entsteht bei langen Listen, die nach oben 
aus dem Bildschirm rollen. Die Ausgabe des folgenden Programms 
z.B. wird oben aus dem Bildschirm hinausgerollt. 
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10 PRINT "<CLR/HOME>" 
20 FOR I = 1 TO 100:PRINT I:NEXT 


Stellen Sie sich vor, daß Sie anstelle der Zahlen sortierte Namen 
oder eine andere Ausgabe haben, die Sie sehen möchten, bevor sie 
aus dem Monitor verschwindet. Je nachdem, welche Ausgabe ge- 
wünscht wird, gibt es unterschiedliche Methoden das Rollen des 
Bildschirms zu kontrollieren. Überlegen Sie folgendes: 


10 PRINT "<CLR/HOME>" 

20 FOR I = 1 TO 100 

30 IF I = 20 THEN GOSUB 100 

40 IF I = 40 THEN GOSUB 100 

50 IF I = 60 THEN GOSUB 100 

60 IF I = 80 THEN GOSUB 100 

70 PRINT I:NEXT I 

80 END 

100 PRINT:PRINT 

110 PRINT "<CTRL><9>WEITER BEI BETÄTIGUNG EINER TASTE"; 
120 GET AS:IF AS = "" THEN 120 
130 PRINT "<CLR/HOME>":RETURN 


Erinnern Sie sich: Sie (und nicht Ihr Computer) führen die Kon- 
trolle durch! Sie können die Ausgabe ganz nach Wunsch gestalten. 
Um den Bildschirm besser zu nutzen, können Sie die Ausgabe auf 
einer anderen Spalte festlegen, nachdem der vertikale Bildschirm 
gefüllt ist. Zum Beispiel: 


10 PRINT "<CLR/HOME>" 

20 FOR I = 1 TO 40 

30 IF I > 20 THEN GOSUB 100 

50 PRINT I:NEXT I 

80 END 

100 PRINT "<HOME>":FOR J = 1 TO (I-20) :PRINT:NEXT J 
110 PRINT TAB(10); 

120 RETURN 


Formatieren Sie Ihre Ausgabe so, daß der Bildschirm am besten 
ausgenutzt ist und Ihren Bedürfnissen entspricht. Spielen Sie 
damit und Sie bekommen so das Rollen des Bildschirms gut unter 
Kontrolle. 
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5.7 Zusammenfassung 


Der Unterschied zwischen einer nützlichen und einer nutzlosen 
Anwendung auf Ihrem Computer liegt in der Formatierung Ihrer Pro- 
gramme. Je besser und klarer Ihr Programm organisiert ist, desto 
größer ist die Chance, einfach und effektiv zu programmieren. 
Formatierung ist mehr als eine Übung, um die Ein- und Ausgabe in- 
teressant zu machen. Es geht um die Kommunikation zwischen Ihnen 
und Ihrem COMMODORE-64! Übrigens: wenn Sie keine Vor- und Nach- 
läufe zu Ihrer Verarbeitung erstellen, sind die besten Berechnun- 
gen nicht zu gebrauchen. 


Genauso wichtig ist es, daß Sie dem Computer mitteilen können, 
was Sie möchten. Es ist also von wesentlicher Bedeutung, die Pro- 
gramme so zu schreiben, daß Sie und andere verstehen, wie es ab- 
läuft. Durch Verwendung von "Blöcken" ist es einfacher, ein Pro- 
gramm zu organisieren, und es ist später besser nachzuvollziehen, 
was in jedem Teil des Programms genau passiert. Es ist selbstver- 
ständlich auch möglich, Programme fortlaufend in einer aufstei- 
genden Zeilennumerierung zu schreiben; Sie müssen dann aber sehr 
wahrscheinlich einfache und/oder komplexere Operationen wieder- 
holt programmieren, die eigentlich besser in einer Unterroutine 
gehandhabt werden könnten. Es ist auch bedeutend schwerer, Fehler 
zu lokalisieren und die nötigen Änderungen vorzunehmen. Mit ande- 
ren Worten: durch die Benutzung einer strukturierten Vorgehens- 
weise beim Programmieren wird die Erstellung des Programms einfa- 
cher, nicht komplizierter. 


Schließlich sollten Sie auch verstehen, warum es TABs und Komman- 
dos für Teilstrings gibt. Es sind nützliche Elemente, mit denen 
die verschiedenen Programmteile so organisiert werden können, daß 
Sie eine vollständige Kontrolle über die Ausgabe Ihres Computers 
haben. Was zuerst nur als nettes, einfaches Kommando im COMMODO- 
RE-64 stand, entwickelt sich über eine nützliche Anwendung zu ei- 
nem hervorragenden Werkzeug. Wenn wir deshalb in Zukunft tiefer 
in die Möglichkeiten des Computers einsteigen, betrachten Sie die 
Vielalt der Kommandos als Mechanismus für eine effizientere und 
letztlich einfachere Kontrolle und nicht als fachspezifischen 
"Berufsjargon" von Computergenies. Übrigens: da Sie jetzt schon 
so weit sind, sollten Sie sich im klaren darüber sein, daß das, 
was Sie jetzt bereits wissen, am Anfang Ihrer Arbeit mit dem Com- 
puter wie ein "Wunder" ausgesehen hat. 
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Einführung 


Die Themen dieses Kapitels betreffen den "Code" und enthalten die 
Art von Kommandos, vor denen man leicht zurückschreckt. Die mei- 
sten Funktionen können mit den uns bereits bekannten Kommandos 
durchgeführt werden, einige jedoch nicht. Wieder andere können, 
wie wir noch sehen werden, besser mit diesen neuen Kommandos for- 
muliert werden. Wie so vieles in diesem Buch, was zuerst "unmög- 
lich" zu lösen schien, ist wirklich sehr einfach, wenn Sie erst 
einmal wissen, wie es geht. Sehr wichtig ist es, mit den Komman- 
dos zu spielen. Dadurch lernen Sie sehr schnell deren Anwendung. 


Das erste, was wir hier lernen, ist der ASCII (ausgesprochen ÄS- 
KY), das für "AMERIKAN STANDARD CODE for INFORMATION INTERCHANGE" 
steht. Im Prinzip ist dies eine Reihe von Zahlen, die standardi- 
siert wurden und die verschiedene Zeichen darstellen. Im COMMODO- 
RE-64-BASIC wird das CHR$S (Character string)-Kommando dazu be- 
nutzt, Zeichen direkt über ihren ASCII-Wert zu ermitteln und aus- 
zugeben. Wir werden sehen, daß das CHR$-Kommando zur Ausgabe von 
speziellen Zeichen sehr nützlich ist. 


Die nächsten Kommandos ermöglichen den direkten Zugang zu Berei- 
chen im Hauptspeicher des Computers. Das erste, POKE, hinterlegt 
Werte im Speicher. Das zweite, PEEK, sucht Speicheradressen und 
gibt die dort stehenden Werte zurück. Wir werden verschiedene An- 
wendungen zu diesen zwei Kommandos durchgehen. Diese Kommandos 
dienen hauptsächlich dazu, bestimmte Arten von Grafik und Tönen 
zu erzeugen. 


6.1 Der ASCII-Code und die CHRS-Funktion 
Wir benutzen in unseren Programmen Control Characters, wie z.B. 
CTRL-9. Es wird folgendermaßen am Bildschirm dargestellt: 
PRINT "<INVERSES R>": REM CTRL-9 
Dies bedeutet, daß wir CTRL-9 in Anführungszeichen eingeben, aber 
ein inverses R (dunkel auf hellem Hintergrund) erscheint. Leider 


können wir CTRL-9 nicht sehen, wenn wir unser Programm auf dem 
Drucker oder Bildschirm auflisten. Wir benutzen deshalb ein REM 
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(Bemerkung), um uns daran zu erinnern, daß ein inverses "R" in 
Wirklichkeit CTRL-9 ist. Ein anderer Weg, ein beliebiges Zeichen, 
(einschließlich Control-Zeichen), auszugeben, ist die Verwendung 
der CHR$S-Funktion und des ASCII-Codes. In ANHANG A finden Sie 
eine komplete Liste aller ASCII-Zeichen. Immer wenn Sie ein Zei- 
chen ausgeben möchten, nehmen Sie CHR$ und den dezimalen Wert des 
gewünschten Zeichens. Geben Sie zum Beispiel folgendes ein: 


PRINT CHRS (65) <RETURN> 


Sie erhalten damit ein "A". Das ist zwar einfach, aber nicht sehr 
interessant. Probieren Sie deshalb das folgende kleine Programm 
aus. Ich wette, Sie können es nicht ohne Verwendung der CHRS$S- 
Funktion schreiben. 


10 PRINT CHR$(147) :REM ASCII-CODE FÜR <CLR/HOME> 

20 QU$ = CHR$(34) :REM ASCII-CODE FÜR ANFÜHRUNGSZEICHEN " 

30 FOR I = 1 TO 20:PRINT:NEXT 

32 PRINT CHR$(18); "BITTE EINE BELIEBIGE TASTE DRÜCKEN ODER"; 
40 PRINT QU$S;" E ";QU$;" ZUM BEENDEN" 


50 GET AN$:IF AN$ = "" THEN 50 
60 IF ANS = "E" THEN END 
70 GOTO 10 


Geben Sie RUN ein und achten Sie genau auf die Ausgabe. Sie sehen 
die Anführungszeichen beim Q. Wenn wir versuchen, ein Anführungs- 
zeichen auszugeben, interpretiert der Computer dies als einen 
Ausgabestring. Da aber QU$ als CHR$(34) definiert wurde, können 
wir Anführungszeichen verwenden, ohne den Ausdruck durcheinander 
zu bringen (Probieren Sie nur zum Spaß mal aus, ob Sie die Aus- 
gabe ohne die CHRS-Funktion erreichen). 


Beachten Sie auch den Anfang des Programms. Anstatt des üblichen 
CLR/HOME haben wir CHRS(147) verwendet. Wir mußten dazu nicht die 
Anführungszeichen (") wie bei CLR/HOME benutzen. Ebenso haben wir 
CHRS (18) genommen statt CRTL-9, um den Inversmodus einzuschalten. 
Um zu sehen, welche unterschiedlichen Zeichen Sie verwenden kön- 
nen, geben Sie folgendes Programm ein: 


10 PRINT CHRS(147) 
20 FOR I = 32 TO 127:PRINT CHR$S(I);:NEXT 
30 FOR I 158 TO 191 :PRINT CHRS(I); :NEXT 
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Na also! Hier haben Sie alle Symbole. Bevor wir aber weiterma- 
chen, lassen Sie uns noch ein paar andere Symbole anschauen, die 
wir nur durch Drücken von zwei Tasten sichtbar machen können. 


Halten Sie die COMMODORE-Taste (in der linken unteren Ecke der 
Tastatur) gedrückt und tippen Sie die SHIFT-Taste: die erste 
Reihe der Buchstaben wird in Kleinbuchstaben dargestellt und die 
Symbole, beginnend mit dem "Pik", verändern sich in Großbuchsta- 
ben. Je nachdem, ob die Kleinbuchstaben "ein"- oder "aus"-ge- 
schaltet sind, werden unterschiedliche Symbole ausgegeben. Tippen 
Sie nun folgende Zeilen ein: 


10 PRINT CHRS(147) 
20 FOR I = 0 TO 31 
30 PRINT CHRS(I); :NEXT 


Im Moment scheint nicht viel passiert zu sein - solange sich der 
Bereich der ASCII-Zeichen zwischen O0 und 31 befindet. In wWirk- 
lichkeit hat sich Ihr System "aufgehängt" und Sie müssen die 
RUN/STOP- und die RESTORE-Taste zusammen drücken, um neu zu star- 
ten. 


Um in den Genuß der verstärkten Leistung Ihres Computers zu kom- 
men, testen Sie folgende kleine Programme: 


1. Programm 


10 PRINT CHR$(147) 

20 LBS = CHR$(54) :RB$S = CHR$(52) 

30 CO$ = "COMMODORE" + CHRS(45) + LBS + RBS 
40 L = 20 - LEN(CO$)/2:PRINT SPC(L);CO$ 

50 FOR I = 1 TO 20:PRINT CHR$S (32) :NEXT 


2. Programm 


10 PRINT CHR$(147) 

20 PRINT CHRS$(18);CHR$(28);:FOR I = 1 TO 35:PRINT CHR$S (32); 
22 NEXT 

30 PRINT CHR$(5):REM VERSUCHEN SIE BITTE VOR DER EINGABE 
DIESES PROGRAMMS, DIE AUFGABE SO ZU LÖSEN 
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Im letzten Programm haben Sie einen Hinweis zum Gebrauch der 
CHR$S-Funktion in Verbindung mit der Erzeugung einer Grafik erhal- 
ten. Der rote Balken wurde durch CHRS$S(32) erzeugt, das Leerzei- 
chen dahinter durch CHR$(18) (entspricht <CTRL-9>) und CHR$(28) 
(entspricht <CTRL-3>). Im nächsten Grafikkapitel benutzen wir 
CHR$S-Funktionen, um richtige Bilder, Tabellen und Grafiken zu er- 
zeugen. (Übrigens, um wieder den normalen Modus zu erreichen, 
benutzen Sie die RUN/STOP- mit der RESTORE-Taste.) 


Das folgende kleine Programm stellt eine Möglichkeit dar, alle 
Werte der CHR$-Zeichen am Bildschirm auszugeben. Sichern Sie es 
auf Diskette oder Band und Sie haben ein gutes Nachschlagewerk 
für alle Werte und die entsprechenden Zeichen und Symbole der 
ASCII-Tabelle. 


CHR$S-LISTE 


10 PRINT CHR$S(147) 

20 GOSUB 300 

30 FOR I = 33 TO 99 

40 IF I = 34 THEN GOTO 400 
50 PRINT I;". =";CHRS(I), 


60 NEXT 
70 PRINT:PRINT "ZUM FORTFAHREN IRGENDEINE TASTE BETÄTIGEN"; 
80 GET AS$S:IF A$ = "" THEN 80 


90 PRINT CHRS (147) 

100 GOSUB 300 

110 FOR I 100 TO 127:PRINT I;". =";CHR$S(I),:NEXT 
120 FOR I = 161 TO 191:PRINT I;". =";CHRS$S(I) ,:NEXT 
130 PRINT:PRINT:END 

300 FOR I = 1 TO 4:PRINT "CHR$/S" ‚,:NEXT 


310 RETURN 

400 PRINT I;". =";"''",:REM DAS AUSZUGEBENDE HOCHKOMMA MUSS 
ZWISCHEN ZWEI EXTRA-HOCHKOMMAS EINGESCHLOSSEN SEIN 

410 GOTO 60 


Das Programm "CHRS-LISTE" kann als ein Nachschlagewerk benutzt 
werden, um sich die CHR$-Werte verschiedener Symbole anzusehen. 
Sie haben bemerkt, daß das Programm zu einer Unterroutine in Zei- 
le 400 verzweigt, wenn I = 34 ist. Der Grund dafür ist das An- 
führungszeichen - CHRS(34); der Rest der Ausgabe würde nur Klam- 
mern invers darstellen. Um dies zu vermeiden, haben wir ein "fal- 
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sches Anführungszeichen" unter Verwendung von zwei Apostrophen 
(SHIFT-7) benutzt. Es entsteht dadurch zwar eine Lücke zwischen 
34 und 35, aber das sieht besser aus als die inversen Klammern. 
Ferner haben wir CHR$S-Werte übersprungen, die den Bildschirm 
sperren, diesen löschen, die Farbdarstellung wechseln oder die 
Ausgabe durcheinander werfen. Sehen Sie zu, ob Sie ein Programm 
schreiben können, das nützliche CHRS-Werte (wie z.B. CTRL-9 und 
Farbattribute) enthält; zerstören Sie aber dabei nicht die Aus- 
gabe. 


6.2 POKE und PEEK 


Ein Blick in den Speicher Ihres Commodore-64 


Am Anfang werden Sie PEEK und POKE nicht häufig anwenden. Wenn 
Sie aber erst einmal die volle Leistungsfähigkeit Ihres Computers 
entdeckt haben, werden Sie diese Kommandos mehr und mehr in Ihre 
Programme einbeziehen. Grundsätzlich speichert das POKE-Kommando 
einen Wert am angegebenen Speicherplatz und ein PEEK-Kommando 
liest den Inhalt eines Bytes an der angegebenen Adresse. Versu- 
chen Sie folgendes: 


POKE 2048,255:PRINT PEEK(2048) <RETURN> 
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Sie sollten jetzt "255" sehen, da das POKE-Kommando diesen Wert 
auf den Speicherplatz 2048 brachte und PRINT PEEK(2048) den In- 
halt dieser Adresse wieder ausgegeben hat. Das ist relativ ein- 
fach, aber es gibt noch mehr Möglichkeiten als das Speichern von 
Zahlen. 


AZ LE 





An manchen Stellen finden wir nur die abgespeicherte Zahl, wie in 
unserem Beispiel oben. An anderen Stellen jedoch löst POKE, je 
nach übertragenem Wert, genau definierte Ereignisse aus. Im fol- 
genden wollen wir uns einige bedeutendere Speicherplätze unseres 
COMMODORE-64 für das PEEKen und POKEn ansehen. (Wir wollen je- 
doch zu komplexe Elemente der PEEKs und POKEs ausklammern). 
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Benutzung von zwei Zahlensystemen 


Wenn wir PEEK und POKE benutzen, nehmen wir dezimale Zah- 
len, um Speicherplätze zu verändern. Die meisten der spe- 
ziellen Speicheradressen, die im COMMODORE-64-HANDBUCH be- 
schrieben sind, werden HEXADEZIMAL (kurz HEX genannt) dar- 
gestellt. Da wir normalerweise immer im Dezimalsystem rech- 
nen, erscheint uns dieses als naturgegeben. Das Dezimale 
System hat als Basis den Wert 10, es gibt jedoch auch Zah- 
lensysteme mit ganz anderen Basen, etwa 8 oder 2. Die "Ba- 
sis 16", genannt HEXADEZIMAL, bietet einen einfacheren Weg 
zur Berechnung des Speicherplatzes eines Computers. Aus 
diesem Grund sehen Sie viele der Angaben in HEX. Hexadezi- 
mal wird genau so gezählt wie dezimal, allerdings in 16er- 
Gruppen. Es benutzt außer den Zahlen auch noch alphanumeri- 
sche Zeichen. Sie erkennen eine Zahl sofort als HEX, da 
diese üblicherweise mit einem Dollarzeichen dargestellt 
wird (z.B. ist $45 nicht dasselbe wie die dezimale Zahl 
45). Oft sehen Sie auch alphanumerische Zeichen mit Zahlen 
zusammen dargestellt (z.B. FC58, AAB, 12C). Im Anschluß se- 
hen Sie eine Liste mit dezimalen Zahlen und der entspre- 
chenden hexadezimalen Darstellung. 


DEZIMAL HEXADEZIMAL 
So 
51 
52 
S$3 
54 
S5 
56 
57 
$8 
s9 
SA 
SB 
SC 
SD 
SE 
SF 
510 


ou BwrnN oO 
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Ehrlich gesagt, 
ich hatte noch nie Probleme 
HEXADEZIMAL zu zählen! 


Wie Sie sehen, beginnen beim hexadezimalen System zwei-stellige 
Zahlen nicht bei 10, sondern erst bei 16 (mit $10). Im Anhang Q 
des COMMODORE-64-HANDBUCHS sind die Adressen sowohl hexadezimal, 
als auch dezimal vermerkt. 


Ein fauler Trick! 


Wenn Sie beginnen, POKE und PEEK an verschiedenen Speicher- 
stellen Ihres COMMODORE-64 anzuwenden, wird nicht immer das 
eintreten, was Sie erwarten. Zwischen den dezimalen Adres- 
sen 2048 und 40959 sind Sie vor unliebsamen Überraschungen 
ziemlich sicher, da es sich hier um den Bereich handelt, 
der vom BASIC belegt wird. In anderen Bereichen jedoch, be- 
finden sich spezielle Routinen, die auf in sie gePOKEte 


Werte direkt reagieren. Wenn Sie z.B. POKE 768,255:PRINT 
PEEK(768) eingeben, wird Ihre Maschine hängenbleiben und 
nicht einmal die Tasten <RUN/STOP> und <RESTORE> bringen 
sie wieder zum Laufen. Sie müssen Ihren Computer ausschal- 
ten, um ihn aus diesem Zustand herauszuholen. Wenn Sie dies 
in einer Ihrer Programme einbauen und es anschließend ei- 
nem Freund geben, würde auch seine Maschine hängenbleiben 
und das wäre ein fauler Trick. Natürlich würden Sie so et- 
was nie machen. Oder doch? 
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Lassen Sie uns nun einen Blick auf einige Speicherplätze werfen, 
die wir mit POKE beeinflussen können. Wir beginnen dazu mit Ihrem 
Bildschirmspeicher. 


6.3 POKEn im Bildschirmspeicher 


Eine andere Verwendung von POKE ist die Einspeicherung von Zei- 
chen im Bildschirmspeicher. Jedes Zeichen hat einen ihm fest zu- 
geordneten Wert zwischen 0 und 255. Sie können sich Ihren Bild- 
schirm als eine Adressenfolge in einer 40 x 25-Matrix vorstellen, 
die bei Adresse 1024 beginnt und bei 2023 endet. Dadurch haben 
Sie genau 1000 Stellen auf dem Monitor, in die Text plaziert 
werden kann. Die Adressen sind fortlaufend angeordnet und können 
mit FOR/NEXT-Schleifen auf einfache Art mit fortlaufenden Text- 
zeilen gefüllt werden. Sie können auch durch Anwendung von POKESs 
an beliebiger Stelle des Bildschirms Text einspeichern. Damit Sie 
eine Vorstellung davon bekommen, was Sie dann sehen werden, 
lassen Sie das folgende kleine Programm laufen und versuchen Sie 
dann die POKESs. 
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10 PRINT CHR$S(147):B = 55296:FOR I = B TO B + 999:POKE 1,1: 
NEXT 


POKE 1190,1:POKE 1191,129 <RETURN> 
FOR I = 1880 TO 1890:POKE I,81:NEXT <RETURN> 
FOR I = 1240 TO (1240 + 255):POKE I, I - 1240:NEXT <RETURN> 


Die erste Zeile zeigt verschiedene Werte für ein normales und ein 
inverses "A", die auf einander folgende Adressen gepokt werden. 
Die nächste Übung benutzt eine Adressenfolge von 1880 bis 1890 
und stellt einen "weißen Ball" an jede Speicherstelle. Die dritte 
Übung benutzt die angrenzenden Speicherstellen, um eine Reihe von 
ASCII Zeichen zu hinteriegen. 





Das folgende Programm soll Sie in das "Konzept der Distanz" ein- 
weisen. Im Prinzip ist die Distanz ein veränderlicher Wert, der 
zu einem festen Anfangswert addiert oder von diesem subtrahiert 
wird. In unserem Programm sind zwei verschiedene Distanzen zu be- 
achten. Die erste ist "127" und legt die maximale Adresse für die 
Programmschleifen in Zeile 20 und 40 fest. Da wir 128 Zeichen 
(von 0 bis 127) mit POKE einbringen möchten, setzen wir unsere 
erste Distanz auf 127 und berechnen unsere Bildschirmadresse aus 
Distanz plus Anfangsadresse. Da wir mit 0 starten (I-1024), enden 
wir mit 127, unserer festgelegten Distanzangabe. Zweitens benut- 
zen wir in Zeile 50 eine Distanz von 128, um die im ersten Ab- 
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schnitt erzeugten inversen Zeichen zu erhalten. Das funktioniert, 
da jedes Zeichen von 0 bis 127, das wir mit POKE eingespeichert 
haben, ein inverses Gegenstück hat, dessen Wert um genau 128 hö- 
her liegt. Deshalb müssen wir, wenn wir ein Zeichen invers dar- 
stellen möchten, nur einfach 128 zum Original-Poke-Wert addieren. 


10 PRINT CHR$S (147) 

20 FOR I = 1024 TO (1024 + 127) 

30 POKE I,(I - 1024) :NEXT 

32 FOR X = 55296 TO (55296 + 127) 
34 POKE X,1:NEXT 

40 FOR I = 1424 TO (1424 + 127) 

50 L= I - 1424:POKE I,L + 128:NEXT 
52 FOR X = 55696 TO (55696 + 127) 
54 POKE X,1:NEXT 

60 FOR I = 1 TO 15:PRINT:NEXT 


Sie wundern sich vielleicht, warum wir die Zeile 60 im Programm 
haben. Nehmen Sie diese heraus und sehen Sie, was passiert. Wir 
brauchen die Zeile 60, damit der Cursor nicht den Zeilennummern 
des Programms folgt, sondern der zu pokenden Bildschirmstelle. 
Sie können beispielsweise ein Zeichen an die HOME-Position (links 
oben) des Bildschirms poken und ebenso ein Zeichen in der letzten 
Zeile des Bildschirms ausgeben, der Cursor bleibt immer am oberen 
Bildschirmrand. Probieren Sie es aus. 


Um ganz leicht zu sehen, welche Zeichen durch die verschiedenen 
Werte produziert werden, poken wir sie in den Bildschirmspeicher. 
Das folgende Programm ermöglicht es Ihnen, einen Wert einzugeben 
und anschließend das entsprechende Zeichen am Bildschirm einzuse- 
hen. Von besonderem Interesse sind die Zeilen 50 und 60. Zeile 50 
gibt eine Nachricht aus und endet statt mit einem Semikolon mit 
einer Leerstelle. Geben Sie jedoch RUN ein, wird das Zeichen 
gleich anschließend an den String aus Zeile 50 ausgegeben, weil 
wir die Ausgabe auf dem Bildschirm direkt hinter den String ge- 
pokt haben. Daher ist es nicht von Bedeutung, ob sich am Ende der 
Zeile 50 ein Semikolon, ein Komma oder ein Leerzeichen befindet. 
Die Ausgabe ist immer an der gleichen Stelle. Sehen Sie selbst: 


10 PRINT CHR$ (147) ;CHR$(5) 

20 PRINT:PRINT:INPUT "BITTE EINE ZAHL ZWISCHEN 0 UND 255 
EINGEBEN ->";X 

30 IF X > 255 THEN 20 

40 PRINT CHR$(19):FOR I = 1 TO 11:PRINT:NEXT 
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50 PRINT "DAS ZEICHEN FÜR ";X;" IST " 

60 POKE (1504 + 25),X:POKE (55776 + 25),1 

70 PRINT:PRINT CHR$(18); "WEITER MIT BELIEBIGER EINGABE - 
ENDE = 'E'"; 

80 GET HK$:IF HK$ = "" THEN 80 

90 IF HK$ <> "E" THEN 10 


Fertigen Sie Listen an! 


Zusätzlich zu den Beschriftungen, die ich an meinem Compu- 
ter angebracht habe, besitze ich noch eine Menge von Auf- 
stellungen. Gut daran ist, daß man auf diesen Listen, nach 
Kategorien geordnet, alles beieinander hat. Sie sollten 
sich eine Liste anfertigen oder kaufen, die alle SYS-, 
POKE- und andere nützliche Speicherplätze und Adressen ent- 
hält. Auch in vielen Computerzeitschriften finden Sie sol- 
che Auflistungen. Sammeln Sie alle, sie sind sehr von Nut- 
zen. 


MINI SYS-LISTE 


entspricht CLR/HOME 
entspricht HOME 

löscht ganze Textzeilen 
Cursor positionieren 
Bildschirm eine Zeile 
hochrollen 

zurück zur aktuellen 
Zeile 





Unterroutinen in Maschinensprache 


Das SYS-Kommando ist ein sehr nützliches Werkzeug zum Beschleuni- 
gen Ihrer Programme. Ein SYS-Kommando startet eine Betriebssys- 
temroutine im ROM des Computers oder im Hauptspeicher. Im COMMO- 
DORE-64-HANDBUCH finden Sie eine Liste der ROM-Routinen Ihres 
Computers. Ganz links sehen Sie die Startadressen der verschiede- 
nen Assemblerroutinen, die mit SYS vom BASIC-Programm aus aufge- 
rufen werden können. Ein Problem stellen die hexadezimalen Anga- 
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ben dar, da beim SYS-Kommando grundsätzlich nur die dezimalen 
Werte verwendet werden. Es sind deshalb Programme und Tabellen 
zur Konvertierung von hexadezimal in dezimal vorhanden. Für den 
Anfänger wäre es nämlich eher verwirrend als klärend, sich den 
Umsetzungsprozeß oder das Monitorlisting näher anzusehen. Statt- 
dessen geben wir Ihnen eine Liste mit einigen nützlichen SYS-Kom- 
mandos. Wenn Sie weiter fortgeschritten sind, werden Sie leichter 
verstehen, wie diese Befehle mit den Betriebssystemroutinen zu- 
sammenarbeiten. 


Probieren Sie die oben angegebenen SYS's in Ihren Programmen aus, 
um den Effekt zu sehen. Hier sind einige Beispiele dafür: 


10 SYS 58692 

20 FOR I = 1 TO 800:PRINT "X"; :NEXT 
30 REM BILDSCHIRM AUSFÜLLEN 

40 SYS 58726:REM CURSOR HOME 

50 FOR I = 1 TO 10:PRINT:NEXT 


10 SYS 58692 
20 FOR I = 1 TO 200:5YS 59062:NEXT 
30 PRINT "WIE BIN ICH HIERHER GEKOMMEN?" 


10 sYS 58962 

20 FOR I = 1 TO 840:PRINT "&";:NEXT 
30 FOR SCROLL = 1 TO 12 

40 FOR PAUSE = 1 TO 400:NEXT PAUSE 
50 SYS 59626:REM SCROLL 

60 NEXT SCROLL 


6.4 Eine ganze Menge Töne 


Da Sie jetzt wissen, wie wir mit POKE Werte an spezielle Spei- 
cheradressen bringen können und sofort Ergebnisse erhalten, wer- 
fen Sie einen Blick auf die phantastischen musikalischen Möglich- 
keiten des COMMODORE-64. Man kann damit nicht nur Musik, sondern 
praktisch jeden gewünschten Ton erzeugen. Wir machen es uns 
jedoch einfach und zeigen Programme und Instruktionen, mit denen 
Ihnen lediglich der Einstieg in die Materie erleichtert werden 
soll. Dazu benutzen wir einen speziellen Chip im COMMODORE-64. 
Er wird als 6581-Chip oder SID-SOUND-SYNTHESIZER-CHIP bezeichnet. 
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Bis jetzt haben wir mit dem 6510-Microprozessor-Chip gearbeitet, 
dem "Herzen" Ihrer Maschine. Im Grunde poken wir Werte in den 
6581 und bekommen Töne zurück zum Monitor. Bevor wir also weiter- 
machen, drehen Sie den Ton des Monitors auf. (Haben Sie einen 
Monitor ohne Lautsprecher, können Sie diese Übungen nicht durch- 
führen.) Speichern Sie die folgenden Übungen auf Diskette ab. So 
können Sie Noten oder Töne mit nur wenigen Zahlen eingeben. 





Sehen wir uns zu Beginn die Speicherplätze an, die wir mit POKE 
ansprechen. Was geschieht dort? 


Is LAUTSTÄRKE. Hier wird die Lautstärke auf das Maximum 
von 15 gesetzt. Dies ist für die Tonausgabe üblich. Als 
Variable benutzen wir VL für die Lautstärke. 


2» ATTACK/DECAY und SUSTAIN/RELEASE. Diese zwei Angaben 
regeln, wie schnell ein Ton ansteigt und dann vom maxi- 
malen Lautstärken-Level abfällt (Attack/Decay) sowie 
die Dauer, die der Ton auf einem bestimmten Level ge- 
halten wird, bevor dieser wieder verlassen wird (Sus- 
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tain/Release). Wir benutzen dazu die Variable AD für 
Attack/Decay und SR für Sustain/Release. 


34 WELLENFORM. Die Wellenform entscheidet darüber, wie der 
Ton erzeugt wird. Wir benutzen nur vier Wellenformen: 
Triangel = 17, Sägezahn = 33, Puls = 65 und Rauschen = 
129. Wir benutzen die Variable WF für Wellenform. 


4. HOHE/NIEDRIGE FREQUENZEN. Diese Werte erzeugen einen 
spezifischen Ton. Jeder Ton erfordert einen hohen und 
einen niedrigen Wert. HF steht für die hohe Frequenz 
und LF für die niedrige. 


Je nachdem, welche Werte in den angegebenen Variablen gepokt wer- 
den, werden verschiedene Töne ausgesendet. Wenn wir zum Beispiel 
VL=10 poken, ist der Wert der Lautstärke 10. Damit haben wir ho- 
he/mittlere Lautstärken. Bevor wir die Variablen poken, müssen 
wir sie aber erst definieren. (Sichern Sie den ersten Teil des 
Programms unter dem Namen "TONVARIABLEN" auf Band oder Diskette, 
so daß Sie nicht alle Werte neu eingeben müssen, wenn Sie eine 
Ton- oder Musikroutine schreiben möchten.) 


10 PRINT CHR$(147) 

20 VL = 54296:REM LAUTSTÄRKE 

30 LF = 54272:REM NIEDERFREQUENZ-TON 

40 LF + 1:REM HOCHFREQUENZ-TON 

50 LW = LF + 2:REM LANGSAM SCHWINGENDER TON 


H 


60 HW = LF + 3:REM SCHNELL SCHWINGENDER TON 
70 WF = LF + 4:REM SINUSTON 

80 AD = LF + 5:REM ATTACK/DECAY 

90 SR = LF + 6:REM SUSTAIN/RELEASE 


Jetzt haben wir die Variablen definiert und können die Werte ein- 
geben, die wir poken möchten. Um Ihnen eine Vorstellung davon zu 
geben, wie das funktioniert und welche Ergebnisse Sie mit den 
verschiedenen Werten erhalten, verwenden wir eine Reihe von IN- 
PUT-Anweisungen, damit Sie auf einfache Weise die Töne und Klänge 
testen können, die von den Werten erzeugt werden. 


157 


Fortgeschrittene Anwendungen 





100 
110 
120 
130 
140 
150 
160 
165 
170 
180 
190 


PRINT: 


INPUT 
INPUT 
INPUT 
INPUT 
INPUT 
INPUT 
IF W% 
INPUT 
INPUT 
INPUT 


PRINT 
"LAUTSTÄRKE (0-15)";V% 
"ATTACK (0-15) ";A% 

"DECAY (0-15)";D% 
"SUSTAIN (0-15)";5% 
"RELEASE (0-15)" ;R% 
"WELLENFORM (0-3 )";W%:PRINT 
<> 2 THEN PRINT:GOTO 180 
"PULSBREITE (0-20.47)" ;w1 
"BITCH (.01-655.35)";P1 
"DAUER (IN SEKUNDEN)"; DU 


Sie haben damit eine Routine, mit der Sie zu pokende Werte einge- 
ben können. Was jetzt noch fehlt, ist die Ausgabe der Töne. 


200 W = 


205 


210 P2% = Pi / 2.56:P3% 


W2% = 


16 *%*27W% 


wi * 100 - W2% * 256 
= Pl * 100 - P2% * 256 


wi / 2.56:W3% 


215 POKE VL,V% 
220 POKE AD,A% * 16 + D% 
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225 POKE SR,S% * 16 + R% 

230 POKE WF,W + 1 

235 POKE LW,W3%:POKE HW,W2% + 8 
240 POKE LF,P3%:POKE HF,P2% 

245 FOR T = 1 TO 800 * DU:NEXT 

250 POKE WF,W 

255 PRINT CHR$ (19); "WEITER? (JA/NEIN)"; 
260 ANS= "JA":INPUT ANS 

265 IF LEFTS(ANS,1) = "J" THEN 100 
300 PRINT CHRS (19); 

310 POKE LF,0:POKE HF,O0 

320 END 


Vergewissern Sie sich, daß der Lautsprecher eingeschaltet ist und 
geben Sie RUN ein. Probieren Sie die verschiedensten Kombinatio- 
nen aus, bis Sie den Ton bekommen, den Sie haben wollen. 


6.5 Zusammenfassung 


Dieses Kapitel hat uns in den Speicherbereich des COMMODORE-64 
geführt. Wenn Sie auch noch kein Profi sind, haben Sie doch eine 
Ahnung davon bekommen, was ASCII-Werte bewirken und wissen jetzt 
ein wenig mehr über Adressen und Speicherbereiche. Hoffentlich 
haben Sie einige der gelernten Kommandos ın Ihren Programmen aus- 
probiert. Je mehr unterschiedliche Kommandos Sie anwenden können, 
desto größer wird Ihr Verständnis für das Ganze. 


Die CHR$S-Funktion hat Sie mit den ASCII-Werten bekannt gemacht. 
Wir haben gelernt, daß wir mit dieser Funktion Zugriff zu ver- 
schiedenen Zeichen haben, die wir sonst in unseren Programmen 
nicht verwenden könnten. 


Das POKE-Kommando hinterlegt einen Wert an einer dezimalen Adres- 
se, das PEEK Kommando holt den Wert an dieser Adresse. Spezielle 
Bereiche im Speicher Ihres COMMODORE-64 haben spezielle Funktio- 
nen, wie etwa die Steuerung der Bildschirmausgabe. Fortgeschrit- 
tene Anwendungen von PEEK und POKE versetzen Sie in die Lage, Un- 
terroutinen auf Maschinenebene schreiben zu können. 
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Benutzen der Grafik 


Einführung 


Eine der schönsten Funktionen des COMMODORE-64 ist die Möglich- 
keit, Grafik zu erzeugen. Es gibt zwei grundlegende Arten der 
Grafik: (1) die Bildschirmgrafik und (2) die Spritegrafik. Die 
Bildschirmgrafik ähnelt einem Text, man benutzt aber viel mehr 
Farben und Figuren anstatt Buchstaben und Zahlen. Man kann sowohl 
die vorhandenen Grafikzeichen als auch Texte gleichzeitig dar- 
stellen. Diese Möglichkeit ist vor allem gut, um eine Grafik zu 
beschriften, wenn man zum Beispiel Geschäftsgrafiken oder Figuren 
darstellen möchte. Drücken Sie die "Commodore-Taste" oder die 
SHIFT-Taste und eine weitere Taste gleichzeitig, so erhalten Sie 
die Computergrafik. 


Die Spritegrafik unterscheidet sich vollständig von der Bild- 
schirmgrafik. Ihre Anwendung ist auch sehr viel komplizierter. 
Pixelgrafik gibt Ihnen jedoch eine unglaubliche Flexibilität und 
Leistungsfähigkeit im Detail, speziell für die Anwendung in 
Spielprogrammen. Wenn Sie etwas erfahrener in der Anwendung der 
Pixelgrafik sind, sehen Sie die unbegrenzten Möglichkeiten für 
die Erzeugung von ansprechenden farbigen und bewegten Grafiken. 
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7.1 Bildschirmgrafik 


Bildschirmgrafik ist sehr einfach in der Anwendung, da Sie die 
Zeichen direkt über die Tastatur eingeben. Sie geben eine ein- 
zelne Figur genau wie eine Zahl oder einen Buchstaben mit PRINT 
aus. Wenn Sie z.B. PRINT "<SHIFT-Z>" eingeben, 





5) 
N 
ir 





erhalten Sie das Karo-Zeichen. Um jedoch interessantere Grafik zu 
erzeugen, müssen Sie Kommandos im Programmodus eingeben. Eine 
Möglichkeit ist die Eingabe mehrerer PRINT-Anweisungen bei deren 
Ausführung nach und nach eine Zeichnung entsteht. Lassen Sie uns 
nun eine Spielkarte zeichnen. Wir machen es uns zu Beginn ein- 
fach und malen eine Pik-2. (Es wäre gut, das Programm auf Band 
oder Diskette abzuspeichern, wie auch die anderen Übungen dieses 
Kapitels. Sichern Sie diese unter verschiedenen Namen, auch wenn 
identische Ergebnisse erzeugt werden, da die Programmierung un- 
terschiedlich ist.) 
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10 PRINT CHRS (147) 

20 PRINT "<SHIFT-U> <7MAL SHIFT-D> <SHIFT-I>" 

30 PRINT "<SHIFT-G> 2 <SHIFT-A> 5LEER <SHIFT-I>" 

40 PRINT "<SHIFT-G> 7LEER <SHIFT-H>" 

50 PRINT "<SHIFT-G> 3LEER <SHIFT-A> 3LEER <SHIFT-H>" 
60 PRINT "<SHIFT-G> 7LEER <SHIFT-H>" 

70 PRINT "<SHIFT-G> 3LEER <SHIFT-A> 3LEER <SHIFT-H>" 
80 PRINT "<SHIFT-G> 7LEER <SHIFT-H>" 

90 PRINT "<SHIFT-G> 5SLEER 2 <SHIFT-A> <SHIFT-H>" 

100 PRINT "<SHIFT-J> <7MAL SHIFT-F> <SHIFT-K>" 


Haben Sie das Programm eingegeben, sollten Sie die vollständige 
Spielkarte bereits auf dem Bildschirm sehen, auch ohne die Einga- 
be von RUN. Geben Sie nun RUN ein, wird der Bildschirm gelöscht 
und die "Pik-2" erscheint links oben am Bildschirm. Auf die glei- 
che Art können Sie eine Vielzahl weiterer Zeichnungen mit Hilfe 
der verschiedenen Figuren Ihrer Tastatur erstellen. Erinnern Sie 
sich: um das rechte Zeichen auf der Taste zu bekommen, benutzen 
wir die SHIFT-Taste, zur Ausgabe des linken Tastenzeichens benut- 
zen wir die COMMODORE-Taste. 


Sehen wir uns noch einmal die "Pik-2" an, um zu klären, ob wir 
dieses Programm verbessern können. Beachten Sie als erstes, daß 
die Zeilen 40, 60 und 80 identisch sind, ebenso wie Zeilen 50 und 
70. Anstatt die Zeilen wiederholt einzugeben, benutzen Sie jetzt 
das GOSUB-Kommando und behandeln Sie diese Zeilen als Unterrou- 
tine. Verwenden Sie Ihren Editor und ändern Sie Zeile 40 in 200 
und Zeile 50 in 300. Fügen Sie nun einen Doppelpunkt und ein RE- 
TURN an Zeile 200 und 300. Nun ändern Sie Zeile 40, 60 und 80 so, 
daß Sie GOSUB 200, und Zeile 50 und 70 so, daß Sie GOSUB 300 le- 
sen können. Weiter brauchen wir noch die Zeile 110 END. Das Pro- 
gramm sollte nun folgendermaßen aussehen: 


10 PRINT CHR$(147) 

20 PRINT "<SHIFT-U> <7MAL SHIFT-D> <SHIFT-I> 

30 PRINT "<SHIFT-G> 2 <SHIFT-A> 5SLEER 2 <SHIFT-H>" 
40 GOSUB 200 

50 GOSUB 300 

60 GOSUB 200 

10 GOSUB 300 

80 GOSUB 200 

90 PRINT "<SHIFT-G> 5LEER 2 <SHIFT-A> <SHIFT-H>" 
100 PRINT "<SHIFT-J> <7MAL SHIFT-F> <SHIFT-K>" 
110 END 
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200 PRINT "<SHIFT-G> 7LEER <SHIFT-H>":RETURN 
300 PRINT "<SHIFT-G> 3LEER <SHIFT-A> 3LEER <SHIFT-H>":RETURN 


Das "hat uns zwar nicht viel Programmzeit eingespart, aber wenn 
Sie Bildschirmgrafik erst einmal wie ein normales Programm be- 
trachten, werden Sie selbst nach Kürzungen suchen, um Speicher- 
platz und Laufzeit zu minimieren. Sehen wir nun, wie einfach es 
ist, aus der "Pik-2" eine "Herz-3" zu machen. Ändern Sie mit Hil- 
fe des Editors die "Pik-2" in den Zeilen 30 und 90 in eine "Herz- 
3"_ 3 (SHIFT-S), und das Pik in Zeile 300 in ein Herz. Ändern Sie 
weiterhin die Zeile 60 von GOSUB 200 in GOSUB 300. Wenn Sie jetzt 
RUN eingeben, haben Sie eine andere Karte mit nur wenigen Ände- 
rungen. Probieren Sie auch die anderen Farben und versuchen Sie 
so, ein vollständiges Kartenspiel zu erhalten. 


Editieren! 


Wenn Sie zum Ändern der Zeilen nicht Ihren Editor benutzt 
haben, hatten Sie hart daran zu arbeiten. Alles was dazu 
wirklich nötig gewesen wäre, ist jedoch nur die Eingabe der 
Änderung in der betreffenden Zeile und dann das Drücken der 
<RETURN>-Taste. Um eine Zeilennummer in eine andere zu 
ändern, überschreiben Sie nur die alte Zeilennummer mit der 
neuen. Um zum Beispiel die Zeile 40 in unserem Orginal 
"Ppik-2" zur Zeile 200 zu machen, benutzen Sie die Cursorta- 
ste und gehen zur Zeile 40. Plazieren Sie den Cursor über 
die "4", geben Sie "200" ein und drücken <RETURN>. Wenn Sie 
das Programm jetzt auflisten, ist die Zeile 40 immer noch 
in der Originalform vorhanden, zusätzlich aber eine Zeile 
200, die identisch mit Zeile 40 ist. 
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7.2 Bringen Sie Farbe in Ihre Grafik 


Wenn alle Grafikzeichen nur in den zwei Blauschattierungen am 
Bildschirm dargestellt würden, wäre dies etwas langweilig. Wenn 
Sie jedoch keinen Farbbildschirm haben, erscheinen Ihre Grafik- 
zeichen schwarz/weiß oder grün (wenn Sie einen grünen Monitor 
haben). Die verschiedenen Farbmuster erzeugen verschiedene Dich- 
ten in den Zeilen oder Figuren, die Sie entwerfen. Benutzen Sie 
keinen Farbmonitor, dann experimentieren Sie am besten mit weiß 
(CHR$(5) oder CTRL-2), wenn Sie auf die entsprechenden Kommandos 
stoßen. Wenn Sie später zur Mustererzeugung am Normalbildschirm 
kommen, können Sie diese mit den Farbcodes für verschiedene Ef- 
fekte variieren. 


Falls Sie einen Farbbildschirm haben, ist es gegebenenfalls not- 
wendig, Ihren TV/Monitor anzupassen, damit Sie die korrekten Far- 
ben erhalten. Am besten tun Sie das, indem Sie ein kleines Farb- 
testprogramm laufen lassen. Das folgende Programm benutzt nur die 
Hälfte des Farbbereichs Ihres COMMODORE-64, da wir mit Hilfe der 
Tastaturgrafik und CHR$-Kommandos nur die Hälfte ausgeben können. 
Die zweite Hälfte sehen wir uns etwas später an. Im Moment reicht 
die Hälfte der Farbpalette aus, damit Sie Ihren Bildschirm ein- 
stellen können. (Lassen Sie die REM-Angaben aus, wenn Sie das 
Programm jetzt eingeben.) 


10 PRINT CHRS$S(147) 

12 FOR V = 1 TO 7:NEXT V:REM TABULATOR 7 ZEILEN 

20 FOR I = 1 TO 8:READ C(I):NEXT:REM LIEST FARBCODES VOM 
DATA-STATEMENT IN ZEILE 100 

30 FOR J = 1 TO 8 

40 PRINT CHRS(18);CHRS(C(J));:FOR K = 1 TO 30:PRINT 
CHR$(32);:NEXT K:REM SCHALTET FARBGRAPHIKMODUS EIN, WÄHLT 
FARBE AUS UND DRUCKT 30 LEERSTELLEN 

50 PRINT:NEXT J:PRINT CHR$S(5) 

60 PRINT SPC(10) ;"FARBTAFEL" 

100 DATA 5,28,30,31,144,156,158,159:REM FARBCODES 


Geben Sie RUN ein und passen Sie Ihren Monitor an. Wenn Sie das 


durchgeführt haben, beschäftigen wir uns mit den unterschiedli- 
chen Farben. 
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Zurück zum Normalzustand 


Wenn wir uns auf dem Bildschirm alle Farbnuancen ansehen 


möchten, müssen wir in den Normalzustand zurückkehren, in- 
dem wir gleichzeitig die Tasten <RUN/STOP> und <RESTORE> 
drücken. 





Lassen Sie uns zu unserem "Pik-2"-Programm zurückkehren. Weil Pik 
schwarz ist, wechseln wir jetzt die Farbe unserer Karte von hell- 
blau in schwarz. Dazu laden Sie bitte Ihr Programm in den Spei- 
cher and fügen Sie folgende Zeile hinzu: 


15 PRINT CHR$(18);CHR$S (144) 


Das war sehr einfach. Machen Sie das gleiche bitte mit Ihrem 
"Herz-3"-Programm. Anstelle von CHRS$S(144) benutzen wir jedoch 
CHR$ (28) für rot. Die folgende Aufstellung zeigt Ihnen die Farben 
und die dazugehörigen CHRS$S Werte. 
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FARBE CHR$S - WERT 
WEISS 5 

ROT 28 
GRÜN 30 
BLAU 31 
SCHWARZ 144 
PURPUR 156 
GELB 158 
CYAN 159 


Lassen Sie uns nun ein einfaches Balkendiagramm mit Hilfe der 
Bildschirmgrafik anfertigen und diese mit Text am unteren Bild- 
schirmrand beschriften. 


10 PRINT CHR$(147) 

20 INPUT "TITEL DER ZEICHNUNG" ; TS 

30 PRINT:PRINT:INPUT "WIE VIELE BALKEN (1-7)";P% 

32 IF P% > 7 THEN 10 

40 FOR C = 1 TO P%:READ C(C) :NECT C 

50 FOR I 1 TO P% 

60 PRINT "DARZUSTELLENDER WERT FÜR BALKEN #";1;:INPUT "(1- 
20)";P(I):IF P(I) > 20 THEN 60 

70 NEXT I 

80 REM *** ENDE DES EINGABEBLOCKS *** 

100 PRINT CHR$(147):5 = 4 

110 FOR I = 1 TO P% 

120 PRINT CHRS (19) 

130 FOR V = 0 TO (20-P(I)):PRINT:NEXT V 

140 FOR PT = 1 TO P(I) 

150 PRINT CHRS (18) ;CHRS(C(I));SPC(S);CHRS (32) ;CHRS (32) 


155 NEXT PT 
160 PRINT CHRS$S (5) ;TAB(S);I:S =S + 4 
170 NEXT I:PRINT CHRS(28);:FOR LN = 1 TO 39:PRINT 


CHRS (100) ;:NEXT LN 

180 L = 20 - LEN(T$S)/2:PRINT CHRS (5) ;SPC(L);T$ 

190 GET AS:IF AS = "" THEN 190 

200 REM *%*%* ENDE AUSGABEBLOCK *%** 

500 DATA 5,28,30,144,156,158,159:REM ALLE FARBEN (OHNE BLAU) 


Geben Sie RUN ein. Sie sehen, wie schön Sie Daten grafisch dar- 
stellen können. Das Programm ist limitiert, da Sie maximal 7 Bal- 
ken ausgeben können, deren Werte zwischen 0 und 20 liegen müssen. 
Es ist jedoch einfach, die Anzahl der Balken zu ändern: Ersetzen 
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Sie den Wert durch einen höheren, ändern Sie die Anzahl der Far- 
ben, ändern Sie die Distanz (S-Variable) und rücken Sie die Bal- 
ken näher zusammen durch Angabe eines CHR$(32) in Zeile 150. Lie- 
gen die Werte jedoch über 20, sind umfangreichere Manipulationen 
erforderlich, da die maximale Höhe des Balkens am Bildschirm 20 
beträgt. Wir werden uns jetzt eine Übung mit zwei Balken ansehen, 
bei der Sie jeden Zahlenbereich eingeben können. 


10 PRINT CHR$(147) 

20 PRINT:PRINT:INPUT "MAX VALUE ->"";MV 

30 N = 1:NN = MV:REM FÜR GRÖßERE GENAUIGKEIT KANN MAN N = .1 
EINSETZEN 

40 IF NN > 20 THEN N = N + 1:NN = MV / N:GOTO 40 
50FORI=-1T102 

60 PRINT "DARZUSTELLENDER WERT" ;I;:INPUT PV(I) 

70 PV(I) = INT(PV(I) / N) 

80 NEXT I 

90 REM *%*%* ENDE DES EINGABEBLOCKS *%** 

100 PRINT CHR$(147);:FOR PL = 1 TO 2 

110 C$ = CHRS(32) + CHRS$S(32) + CHRS(32) + CHRS(32):REM DIE 
BALKEN WERDEN 4 SPALTEN BREIT 

120 PRINT CHR$(19):FOR V = 0 TO (20-PV(PL)) :PRINT:NEXT 

130 FOR PT = 1 TO PV(PL) :PRINT CHR$(18) ,‚CHR$S (28) ;SPC(PL*10); 
CS:NEXT PT 

140 NEXT PL 

150 FOR LN = 1 TO 39:PRINT CHR$S (30) ;CHRS (100) ; :NEXT 

160 PRINT CHRS(5) 

170 PRINT SPC(9) ;"BLKN 1 ";SPC(5),"BLKN 2"; 

180 GET A$S:IF AS = "" THEN 180 


Um zu zeigen, was hier vor sich geht, werde ich die entsprechen- 
den Zeilen durchgehen und jede einzeln erklären. 


ls In Zeile 30 wird eine Variable NN definiert. Sie erhält 
den maximalen Wert von MV, der in Zeile 20 eingegeben 
wurde. 


2% In Zeile 40 wird NN mit 20 verglichen, um zu sehen, ob 
der maximale Wert größer 20 ist. Dies dient der Erzeu- 
gung einer proportionalen Skala. Ist der Wert größer 
20, wird zur Variablen N I dazuaddiert, NN wird neu de- 
finiert und stellt den Wert von MV, diviert durch N 
dar. Es findet anschließend ein Sprung zum Anfang der 
Zeile statt; ein neuer Vergleich wird durchgeführt. So- 
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bald die Bedingung NN > 20 nicht mehr zutrifft (MV / 
N), wird die Schleife beendet. Der Wert von N wird im 
weiteren Programmverlauf dazu benutzt, um jeden einge- 
gebenen Wert durch den Wert von N zu dividieren. 


ZUM BEISPIEL: 


Der Wert von MV wird auf 100 festgesetzt. Da 100 
größer 20 ist, wird 1 zu N addiert und 100 jetzt 
durch 2 dividiert. Das Ergebnis 50 wird in der 
Variablen NN gespeichert. Da 50 immer noch größer 
20 ist, erhöht sich N auf 3. Wenn MV jetzt durch 3 
dividiert wird, erhalten wir den Wert 33,33. Wie- 
der ist dieser größer als 20 und es findet ein 
weiterer Schleifendurchlauf statt. Die Schleife 
wiederholt sich bis N den Wert 5 hat. MV, divi- 
diert durch N, ergibt jetzt den Wert 20. Wenn nun 
ein Vergleich mit 20 durchgeführt wird, steht 
fest, daß NN nicht größer als 20 ist und die 
Schleife wird mit dem Wert 5 für N verlassen. Ganz 
gleich, welchen Wert Sie eingeben: solange Sie 
nicht den maximalen Wert ausführen, tritt kein 
Fehler auf, da alle Balkenwerte wie PV(1) usw. 
durch 5 dividiert werden. Da 100 der eingegebene 
maximale Wert ist, stellt 20 den maximal auszuge- 
benden Wert dar. 


Für PV(I) werden in Zeile 60 zwei Werte eingegeben und 
diese Werte in Zeile 70 durch N dividiert. Das INT- 
Kommando dient zur Erzeugung einer Ganzzahl (Integer) 
für den Balken. 


In Zeile 110 wird C$ für die Verkettung von vier Leer- 
zeichen, CHRS(32), definiert. Dies dient dazu, um die 


Balken in der Breite von vier Zeichen darzustellen. 


Zeile 120 bis 140 zeichnen die Balken wie in unserem 
ersten Balkendiagrammprogramm. 
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Für Perfektionisten mit etwas Zeit 


Jedesmal, wenn wir Zeile 40 ausführen, erhöhen wir N um 1. 
Wünschen wir einen etwas geringeren Wert, können wir N auch 
um .1 oder .01 oder sogar .00001 erhöhen. Dies liefert uns 
einen angenäherten Minimalwert, durch den PV(I) dividiert 


wird, und doch erreichen wir damit eine Proportion. Es dau- 
ert jedoch auch länger, den Minmalwert von N in der Schlei- 
fe zu finden. Ändern Sie das Programm ab, um die unter- 
schiedlichen Ergebnisse zu sehen. Je kleiner die Erhöhung, 
desto näher erscheint der maximale Wert an der Obergrenze 
der Ausgabe, und desto länger braucht das Programm zur Aus- 
führung. 





Wir haben uns nun sehr lange mit der Ausgabe von Balken mit Hilfe 
der Bildschirmgrafik beschäfigt. Es ist jedoch ebenso wichtig, 
sich die praktischen Anwendungsmöglichkeiten dieser Grafikfunk- 
tion anzusehen. Die Benutzer sehen Bildschirmgrafik oft nur als 
Ausgabemöglichkeit für Mosaikbilder auf dem Bildschirm an. Aber 
wie wir gesehen haben, ist es möglich, diese Funktion sehr gut 
praktisch einzusetzen. Lassen Sie uns noch etwas Bewegung auf den 
Bildschirm bringen, bevor wir dazu übergehen, Grafik auf den 
Bildschirm zu poken. 


Bewegung auf dem Bildschirm kann für Spiele und für spezielle 
Effekte genutzt werden. Wir geben Ihnen einige grundlegende Bei- 
spiele, um Ihnen das Konzept zu zeigen. Durch das Plazieren eines 
Zeichens auf dem Monitor, dessen Aufnehmen und erneutes Plazieren 
auf einer anderen Position, erzeugen Sie die Illusion von sich 
bewegenden Bildern. Das funktioniert auf die gleiche Weise wie 
ein Zeichentrickfilm. Eine Reihe von Bildern blitzt in gleich- 
mäßigen Abständen am Bildschirm auf. Auch wenn jedes einzelne 
Bild eine gleichbleibende Figur darstellt, scheinen sich diese 
Figuren durch das rasche Aufblitzen in einer Folge zu bewegen. 
Ihr Computer macht das gleiche. Das folgende kleine Programm läßt 
zum Beispiel einen Ball in der linken oberen Ecke des Schirms 
aufhüpfen. 


10 PRINT CHRS (147) 
20 PRINT "<SHIFT-Q> ":REM VOR DEM LETZTEN HOCHKOMMA 
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LEERZEICHEN! 

30 FOR I = 1 TO 100:NEXT 

40 PRINT CHR$(19):PRINT " <SHIFT-Q>":REM NACH DEM ERSTEN 
HOCHKOMMA LEERZEICHEN! 

50 FOR I = 1 TO 100:NEXT 

60 PRINT CHR$(19):GOTO 20 


Was als hüpfender Ball erscheint, ist in Wirklichkeit eine auf 
dem Bildschirm plazierte Figur, die gelöscht und an einer anderen 
Position wieder angezeigt wird. Machen wir das gleiche nun in der 
vertikalen Achse mit Hilfe der Cursorsteuerung im Programm. Zum 
Spaß fügen wir noch Töne und andere spezielle Effekte hinzu. 


10 PRINT CHR$S(147) :REM **%* BEGINN DES GRAPHIKBLOCKS *** 

20 FOR I = 1 TO 25 

30 PRINT TAB(20) ;"<SHIFT-Q><CURSOR HOCH>":REM EIN WEIBER, 
INVERSER BALL ERSCHEINT AM BILDSCHIRM 

40 FOR J = 1 TO 50:NEXT J:REM VERZÖGERUNG 

50 PRINT TAB(20); "<SPACE>":REM LÖSCHT DEN BALL 

60 PRINT 

70 NEXT I 

80 GOSUB 200 

90 PRINT TAB(20);"*":REM ***ENDE DES GRAPHIKBLOCKS *%*%* 

100 GET AS$S:IF AS = "" THEN 100 

110 END 

200 REM **%* TÖNE *%*% 

210 POKE 54296,15:POKE 54277,20:POKE 54278,60:REM LAUTSTÄRKE 
‚„ ATTAKC/DECAY, SUSTAIN/RELEASE 

220 POKE 54273,5:POKE 54272,185:POKE 54276,129:REM FERQUENZ;, 
WELLENFORM 

230 FOR DU = 1 TO 50:NEXT DU:REM DAUER 

240 POKE 54277,0:POKE 54278,0:POKE 54276,0:REM TONERZEUGUNG 
AUS 


Durch das Experimentieren mit verschiedenen Algorithmen können 
Sie eine Menge von Effekten erzielen. Wenn Sie Arcadespiele mit 
Bewegung und Tönen kennen, haben Sie nun eine Vorstellung davon, 
wie diese programmiert wurden. Beginnen Sie also an diesem SUPER- 
WELTRAUM-MONSTER Spiel zu arbeiten. 


Da wir jetzt wissen, wie sich Figuren am Bildschirm bewegen, las- 
sen Sie uns tiefer in die Anwendung der Farbe einsteigen. Das er- 
ste, was wir uns ansehen, ist die Änderung der Hintergrundfarbe 
und der Umrahmung des Bildschirms. Später betrachten wir die 
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‚Speicherbereiche für die Farbe, um alles an jede Stelle in jeder 
Farbe auf den Bildschirm zu bekommen. 


Zu Beginn sehen wir uns noch einmal unser "Pik-2"-Programm an. 
Wir wissen schon, daß die Karten schwarz und nicht hellblau sein 
sollten. Jeder Kartenspieler weiß aber auch, daß "grüner Filz" 
den korrekten Hintergrund des "Tisches" bildet. Um den Hinter- 
grund und die Umrandung des Bildschirms zu verändern, benutzen 
wir folgende POKEs: 


POKE 53281,(0-15) HINTERGRUNDFARBE 
POKE 5328,(0-15) FARBE DES BILDSCHIRMRANDES 


Laden Sie "Pik-2" in Ihren Speicher, drücken CTRL-1, um die Zei- 
chenfarbe Schwarz zu erhalten und geben Sie POKE 53281,5 ein. 
Wenn Sie das Programm jetzt laufen lassen, bekommen Sie eine 
schwarze Karte auf grünem Hintergrund. Da die Umrandung des Ti- 
sches meist aus Holz ist, gestalten wir die Umrandung des Bild- 
schirms mit einem POKE 53280,9 braun. Unser Bildschirm sieht 
jetzt mehr wie ein Spieltisch aus. (Um den Normalzustand zu be- 
kommen, drücken Sie die Tasten <RUN/STOP> und <RESTORE>.) 


Es ist sehr einfach, die Farbe des Hintergrunds und der Umrandung 
zu ändern. Die folgende Liste zeigt Ihnen den Code für die 16 
möglichen Farben. 


CODE FARBE CODE FARBE 
0 SCHWARZ 9 BRAUN 
1 WEISS 10 HELLROT 
2 ROT 11 GRAUSTUFE 1 
3 CYAN 12 GRAUSTUFE 2 
4 VIOLETT 13 HELLGRÜN 
5 GRÜN 14 HELLBLAU 
6 BLAU 15 GRAUSTUFE 3 
7 BELB 
8 ORANGE 


Das folgende kleine Programm führt Sie kurz durch die verschiede- 
nen Hintergrund- und Randfarben. 


10 PRINT CHR$ (147) 


20 BG = 53281 :BD = 53280 
30 INPUT "HINTERGRUNDFARBE ";Bi:IF Bi > 15 THEN 30 
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40 INPUT "RANDFARBE ";B2:IF B2 > 15 THEN 40 
50 POKE BG,B1:POKE BD,B2 
60 GOTO 10 


Wenn Sie RUN eingeben, können Sie mit verschiedenen Textfarben 
experimentieren durch Drücken von CTRL und einer Taste von 1 bis 
8. Sie werden sehen, daß bestimmte Textfarben auf bestimmten Hin- 
tergrundfarben mehr oder weniger deutlich sind. (Schwarz auf 
schwarz ist sehr schwer zu lesen!) 


Sie haben vielleicht bemerkt, daß wir 16 verschiedene Farben für 
den Hintergrund und den Rand des Bildschirms festlegen können. 
Für unsere Tastaturgrafik haben wir jedoch nur 8 Farben. Um die 
Zeichen der Tastatur in allen Farben darzustellen, müssen wir die 
Speicherplätze des COMMODORE-64 für den Bildschirm und die Farbe 
genau kennen. Wie Sie bereits wissen, ist unser Bildschirm eine 
Matrix von 40 x 25. Jedes Element dieser Matrix steht für eine 
bestimmte Adresse im Hauptspeicher. Der Bildschirmspeicherbereich 
beginnt bei Adresse 1024 und endet bei 2023. Er stellt somit 1000 
Positionen bereit, um etwas auf dem Bildschirm darzustellen. 
Durch das Poken verschiedener Werte auf diese Positionen, können 
Sie Zeichen in jeder beliebigen Lage am Bildschirm darstellen. 
Jedes Zeichen hat einen Code (ähnlich dem CHR$-Code); allerdings 
wird der Code gepokt und nicht geprintet. Der Code für "A" ist 
zum Beispiel 1. Wenn Sie mit POKE eine Speicherstelle zwischen 
1024 und 2023 mit "1" belegen, erscheint auf der festgelegten 
Stelle ein "A". Ein Beispiel: löschen Sie Ihren Bildschirm, und 
geben Sie POKE 1475,1 ein. In der Mitte Ihres Bildschirms er- 
scheint jetzt ein weißes "A". Beachten Sie auch die Position des 
Cursors: er steht noch immer oben am Bildschirm, weil Sie eine 
Speicherstelle dargestellt und nicht ein Zeichen mit PRINT ausge- 
geben haben. Um die Speicherplätze genauer zu betrachten, füllen 
wir diese mit "A's" auf, indem wir folgendes im Kommandomodus 
eingeben: 


FOR I = 1024 TO 2023:POKE I,1:NEXT 


Das folgende kleine Programm durchläuft alle Codes und stellt sie 
in der Mitte des Bildschirms dar. 


10 PRINT CHRS(147) 

20 FOR I = 0 TI 127 

30 POKE 1484,1 

40 FOR J = 1 TO 200:NEXT J:NEXT I 
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Machen wir eine kleine Wanderung über unseren Bildschirm. Wir 
starten mit der Speicherstelle 1024 und wandern mit einem Pfeil 
(Code 62) zur Speicherstelle 2023. 


10 PRINT CHR$(147) 

20 BG = 1024:ES = 2023 

30 FOR I = BG TO ES:POKE I,62:FOR J = 1 TO 5:NEXT J:POKE 
I,96 

40 FOR K = 1 TO 5:NEXT K:NEXT I 


Um die Bewegung am Bildschirm darzustellen, poken wir erst einen 
Pfeil (Code 92) und anschließend eine Leerstelle (Code 96) in die 
gleiche Speicherstelle, belassen jedes Zeichen kurz an der Stel- 
le, gehen dann zur nächsten Speicherstelle und wiederholen den 
Vorgang. Durch die Benutzung der Bildschirmspeicherplätze haben 
wir eine bessere Kontrolle über die Zeichen und Bewegungen und 
können von einem Punkt zum anderen springen, ohne uns um die Po- 
sition des Cursors zu kümmern. Kehren wir zurück zu unserem hüp- 
fenden Ball; wir verwenden diesmal jedoch POKES. 


10 PRINT CHRS (147) 
20 FOR I = (1024 
30 POKE I,81:FOR 
40 POKE I,96:FOR 
50 FOR I = (1984 
60 POKE I,81:FOR 
70 POKE I,96:FOR 
80 GOTO 20 


20) TO 1984 STEP 40 

= 1 TO 10:NEXT D 

1 TO 10:NEXT X:NEXT I 
) TO 1024 STEP -40 

1 TO 10:NEXT D 

1 TO 10:NEXT X:NEXT I 


xD + x: 0O+ 


Beachten Sie, daß wir an der linken oberen Ecke angefangen und 
eine Distanz von "20" dazuaddiert haben, um den Ball in die Mitte 
des Bildschirms zu bringen. Ab Zeile 50 führen wir den Prozeß in 
umgekehrter Richtung durch. 


Lassen Sie uns die Speicherbereiche für die Farbe näher ansehen. 
Sie beginnen auf Position 55296 und enden bei 56295. Wiederum 
sind es 1000 Speicherplätze; betrachten Sie diese als Überlage- 
rung der Bildschirmbereiche. Die erste Stelle des Bildschirmbe- 
reichs ist 1024; für den Farbbereich ist es 55296. Zunächst poken 
wir ein Zeichen in den Bildschirmspeicherplatz und anschließend 
eine Farbe für dieses Zeichen in den Farbspeicherplatz. 


POKE 1024,81 <RETURN> 
POKE 55296,8 <RETURN> 


176 


Benutzen der Grafik 


Als erstes erscheint der Ball, der dann die Farbe zu orange än- 
dert, einer Farbe, die Sie vorher für die Zeichen nicht zur Ver- 
fügung hatten. 


Nun sind Sie vielleicht an einem Punkt, wo Sie sich fragen: "Wie 
um alles in der Welt soll ich die entsprechende Stelle unter den 
Tausenden herausfinden und außerdem einen der 127 Zeichencodes. 
Und wie kann ich jetzt noch tausend verschiedene Farbspeicher- 
plätze darüberlegen, mit einer der 16 Farben des Bildschirmspei- 
cherbereiches und dann das ganze noch auf einen bestimmten Platz 
bringen?" In Wirklichkeit ist dies aber nicht so schwierig, wie 
es sich anhört. Übergeben Sie diese Arbeit doch Ihrem Computer, 
wie alle anderen Berechnungen auch! Das folgende ist Schritt für 
Schritt ein Überblick, den wir für ein Programm festlegen, das 
diese Berechnungen mit Variablen durchführt. 


BS = 1024 <- BEGINN DES BILDSCHIRMSPEICHERS 
BC = 55296 <- BEGINN DES FARBSPEICHERS 
CS = XXXX <- AUGENBLICKLICHE POSITION DES ZEICHENS 


OF = CS - BS <- DISTANZ ZWISCHEN ZEICHENPOSITION UND 
BEGINN DES BILDSCHIRMSPEICHERS 


CC = BC + OF <- PLATZ DER FARBE 
CI = XX <- ZEICHENCODE 0 - 127 
C2 = XX <- FARBCODE 0 - 15 


Grundsätzlich bestimmen Sie die korrespondierende Speicherstelle 
des Bildschirm- und Farbspeichers, indem Sie einfach die Spei- 
cherstellen vom Anfang des Bereichs bis zu dem betreffenden Spei- 
cherplatz zählen. Da beide Bereiche fortlaufende Adressen benut- 
zen, können wir für beide Bereiche auch die gleiche Distanz ver- 
wenden. Das folgende Programm benutzt die obigen Variablen und 
ermöglicht Ihnen die Plazierung eines Zeichens auf einer beliebi- 
gen Position. 


10 PRINT CHRS (147) 

20 BS = 1024:BC = 55296 

30 INPUT "KOORDINATE IM BILDSCHIRMSPEICHER (1024-2023)";C$ 
40 INPUT "CODE DES DARZUSTELLENDEN ZEICHENS ( 0- 127)";c1 
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50 oOF = CS - BS:CC = BC + OF 


60 INPUT "FARBCODE ( 0- 15)";c2 
70 POKE CS,C1:POKE CC,C2 

80 GET AS:IF AS = "" THEN 80 

90 GOTO 10 


Spielen Sie mit dem Programm, bis Sie wissen, welcher Code die 
verschiedenen Zeichen und Farben liefert. Anschließend probieren 
Sie das folgende Programm aus, welches Ihnen einen "Perlenschlei- 
er" und einen anderen Weg zur Erzeugung von Farbeffekten unter 
Verwendung von programmierten POKEs zeigt. 


10 PRINT CHR$S(147) 

20 BS = 1024:ES = 2023 

30 BC = 55296:EC = 56295 

40 FOR I = BS TO ES:POKE I,81:NEXT I 

50 FOR C = BC TO EC STEP 2:POKE C,8:NEXT C 

60 FOR NC = (BC + 1) TO EC STEP 2:POKE NC,4:NEXT NC 
70 FOR C = BC TO EC STEP 2:POKE C,5:NEXT C 

80 FOR NC = (BC + 1) TO EC STEP 2:POKE NC,6:NEXT NC 
90 GET S$:IF S$ = "" THEN 90 

100 PRINT CHR$S (147) 


Stellen Sie sich vor, Sie möchten nicht nach jedem Zeichen su- 
chen, das Sie eingegeben haben. Angenommen, Sie möchten Ihren Na- 
men oder eine Überschrift mit Hilfe der INPUT-Anweisung und der 
Tastatur schreiben, dann können Sie jetzt die Bildschirmbereiche 
benutzen und Zeichen hineinpoken. Während wir dies machen, lernen 
wir ein neues Kommando kennen, ASC. Das ASC-Kommando wandelt das 
erste Zeichen eines Strings in einen CHR$S-Code. Zum Beispiel ist 
der ASCCI Code für ein "A" 65. Wenn Sie nun 


PRINT ASC("A") 
eingeben, bekommen Sie 
65. 


Da Sie diesen CHRS-Wert zum Poken schlecht nehmen können, wandeln 
Sie diesen CHR$S-Code in einen zu pokenden Wert um. Wenn Sie sich 
nun die Bildschirmausgabe, die ASCII- und CHR$S-Codes ansehen, 
stellen Sie fest, daß das ASCII-Alphabet bei 65, der Bildschirm- 
code aber bei 1 beginnt. Um eins ins andere zu verwandeln, brau- 
chen wir nur einfach 64 zu addieren oder zu subtrahieren, je 
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nachdem, in welche Richtung wir konvertieren. Da wir ASCII in 
Bildschirmcode konvertieren möchten, subtrahieren wir 64 vom 
jeweiligen ASCII Wert (ASC). Tippen Sie folgendes ein: 


10 PRINT CHRS(147) 

20 INPUT "GEBEN SIE EINEN BUCHSTABEN (A-Z) EIN: "AS 
30 A = ASC(A$):Al = A - 64 

40 POKE 1024,A1l 

50 GOTO 20 


Wie Sie sehen, erscheint jetzt jedesmal, wenn Sie ein Zeichen 
eingeben, dieses in Weiß am oberen linken Bildschirmrand (Stelle 
1024). 


Da Sie nun wissen, wie Sie einzelne Buchstaben auf einer bestimm- 
ten Stelle des Bildschirms ausgeben können, versuchen Sie das 
gleiche mit längeren Strings. Um dies zu erreichen, machen Sie 
bitte folgendes: 


1. Definieren Sie einen String oder geben Sie diesen mit 
INPUT ein. 


2: Teilen Sie den String in einzelne Buchstaben, so daß 
Sie für jedes Zeichen seinen ASCII-Wert ermitteln kön- 
nen. (Das ASC Kommando liest nur das ganz links stehen- 
de Zeichen des Strings.) 


3. Konvertieren Sie den ASCII-Wert in den Bildschirmcode. 
4. Poken Sie den ermittelten Code. 


Wir benutzen die Distanz 64 und unser MID$S-Kommando, um jedes 
Zeichen zu untersuchen. Wenn wir jedoch auf ein Leerzeichen stos- 
sen (ASCII Wert 32), bekommen wir Schwierigkeiten, da 32 - 64 
eine negative Zahl ergibt. Um das zu vermeiden, führen wir eine 
Prüfung auf Leerstellen durch und definieren dieses mit dem kor- 
rekten POKE-Wert, der ebenfalls 32 ist. Um die Sache einfach zu 
gestalten, geben wir unsere Strings am oberen linken Bildschirm- 
rand aus. 
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10 PRINT CHRS(147) 

20 PRINT:PRINT:INPUT "IHR NAME:";NAS 

30 BS = 1024:BC = 55296 

40 DIM A(LEN(NAS)),AI(LEN(NAS)):REM DIMENSIONIERUNG, FALLS 
NAME LÄNGER ALS 11 ZEICHEN IST 

50 FOR I = 1 TO LEN(NAS) 

55 IF ASC(MIDS (NA$S,I,1)) = 32 THEN Al(I) = 32:NEXT I:REM 
PRÜFUNG AUF LEERSTELLEN 

60 A(I) = ASC(MID$S(NAS,I,1)):AlI(I) = A(I) - 64:REM UMWANDELN 
DES ASCII-CODES IN BILDSCHIRM-CODE 

70 NEXT I 

80 FOR P = 1 TO LEN(NA$):POKE BS + P,A1(P):NEXT P:REM POKEN 
100 REM *%*%* FARBPALETTE *%*% 

110 INPUT "FARBCODE (0O-15)";C2 

120 FOR C = 1 TO LEN(NAS) :POKE BC + C,C2:NEXT C 

130 GET WS:IF W$ = "" THEN 130 

140 RUN 


Wenn Sie jetzt aber einen Punkt (.) eingeben, lösen Sie einen IL- 
LEGAL QUANTITY ERROR IN 60 aus, weil der Punkt, genau wie das 
Leerzeichen, einen kleineren ASCII-Wert als 65 hat. Wenn Sie auch 
Punkte mit eingeben möchten, werfen Sie einen Blick auf die Leer- 
zeichenprüfung in Zeile 55. Versuchen Sie eine ähnliche Abfrage 
für Punkte einzubauen. Sie sollten jetzt allmählich wissen, wie 
Tastaturzeichen gepokt werden und wie Sie Programme schreiben 
können, die Strings in den Bildschirmspeicherbereich poken. 
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7.3 Spritegrafik 


Lassen Sie uns jetzt noch eine weitere sehr leistungsfähige Mög- 
lichkeit des COMMODORE-64, die Spritegrafik, ansehen. Als erstes 
müssen wir erkären, was ein "Sprite" ist und wofür man es verwen- 
det. Im Prinzip ist ein Sprite eine im Speicher hinterlegte Fi- 
gur. Je nachdem, was Sie an bestimmten Speicherstellen hinter- 
legen, bekommen Sie verschiedene Figuren oder "Pixel". Sie werden 
in Spielprogrammen benutzt, dienen aber auch zur Belebung jeder 
anderen Darstellung. 


Der Vorteil der Spritegrafik beim COMMODORE-64 liegt darin, daß 
Sie eine große Kontrolle bei der Erstellung haben, da Sie Sprites 
in einem verschlüsselten Binär-Code eingeben. Der Nachteil ist, 
daß die Spritegrafik ein bißchen schwieriger zu verstehen ist. 
Wenn Sie jedoch selbst Sprites zwischen die BASIC-Elemente des 
Programms einfügen können, lohnt sich die Anstrengung. Um Ihr 
Interesse zu wecken, beginnen wir mit einem einfachen Beispiel: 
Ein "Raumschiff". Wir erklären später alles. Geben Sie vorerst 
das Programm ein und sehen Sie sich an, was passiert: 


10 PRINT CHR$S (147) 

20 BG = 53248:REM BEGINN DES GRAPHIK-CHIPS 

30 TU = BG + 21:REM ADRESSE FÜR PIXEL 'XX' 

40 Si = 2:REM PIXELFAKTOR 1 

50 L = 2040:REM ANFANGSADRESSE DES PIXELPOINTERS 

60 22 = 832:REM ANFANGSADRESSE DER DATEN 

70 SL = 13:REM DATENBLOCK NUMMER 13 

80 X1 = BG + 2:Yli = BG + 3:REM X,Y KOORDINATEN 

90 REM *** ENDE DER VARIABLEN-DEFINITION 

200 FOR R = 0 TO 29:READ D:POKE SS + R,D:NEXT R:REM EINLESEN 
DER DATEN FÜR DIE KONSTRUKTION DER GRAPHIK IN DEN ZEILEN 
500-520 

210 POKE TU,S1:REM EINSCHALTEN PIXEL #1 

220 POKE L + 1,SL:REM EINLESEN DER DATEN FÜR PIXEL #1 
230 POKE Y1,100:REM VERTIKALE ADRESSE 

240 FOR H = 0 TO 255 

250 POKE X1,H:NEXT H:REM HORIZONTALE ADRESSE 

260 GOTO 240: REM SCHLEIFE 

270 REM *%*% ENDE GRAPHIKERSTELLUNG UND BEWEGUNG *** 
500 DATA 2,0,64,2,0,64,2,24,64 

510 DATA 2,60,64,2,102,64,3,255,192 

520 DATA 2,60,64,2,24,64,2,0,64,2,0,64 
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Wenn Sie alles korrekt eingegeben haben, sollten Sie ein "Raum- 
schiff" horizontal über den Bildschirm fliegen sehen. Es gibt 
noch eine Menge anderer Möglichkeiten mit Pixel; lassen Sie uns 
aber das Beispiel von oben verwenden, um zu erklären, was da vor 
sich geht. 


Als erstes befassen wir uns kurz mit dem Konzept der Binärarith- 
metik. Wenn wir unsere Sprites als Punkte am Bildschirm betrach- 
ten die in Blöcke zusammengefaßt sind, verstehen wir sowohl die 
Binämathematik als auch die Sprites. Zu Beginn sehen wir uns die 
8 Bits eines Bytes an, die von 7 bis 0 numeriert sind. Sie ent- 
halten entweder eine 0 oder eine 1, die einzigen Ziffern des Bi- 
närsystems. 


Für den Computer müssen alle Angaben im Binärsystem vorhanden 
sein. Der 6510 Microprozessor führt dies in Bereichen durch, die 
"Bytes" genannt werden. Jedes Byte ist 8 "Bits" lang. Die oben 
binär dargestellte Zahl "01011010" bedeutet die dezimale Zahl 
"90". Immer wenn Sie die Zahl "90" über die Tastatur eingeben, 
wird diese vom Computer in "01011010" übersetzt. 


Er führt diese Konvertierung automatisch durch. Für die Sprite- 
grafik müssen Sie diese Aufgabe selbst übernehmen. Es ist jedoch 
sehr einfach. Da wir in der Binärarithmetik nur zwei mögliche Zu- 
stände haben, hängen wir einfach eine 0 an, damit wir eine andere 
Kombinationsmöglichkeit erreichen. Das gleiche machen wir ja auch 
in der Dezimalarithmetik. Wenn wir z.B. die 9 erreichen, starten 
wir erneut mit "1" und hängen eine "0" an, um eine 10 zu bekom- 
men. Wenn wir binär zählen, sieht das folgendermaßen aus: 


0=0 
1=1 
10=2 
11=3 
100 =4 
101 =5 
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110 6 
111 7 
1000 = 8 


Es ist genau wie bei den Grenzen 9, 99 oder 999 im Zehnersystem: 
Wir starten mit 1 und hängen eine weitere Stelle an. Beim Binär- 
system führen wir das gleiche bei 11, 111 oder 1111 durch, da wir 
nur die Zustände 0 und 1 zur Verfügung haben. Da wir nicht ge- 
wohnt sind, im Binärsystem zu arbeiten, brauchen wir einen einfa- 
chen Weg, um binär in dezimal zu konvertieren. Auf Seite 78 Ihres 
COMMODORE-64-HANDBUCHES finden Sie eine kleine Tabelle zur Um- 
wandlung von der Binärdarstellung in die Dezimaldarstellung. 
(Geben Sie bei dem aufgeführten Programm noch folgende Zeile ein, 
um ein Abbruchskriterium für das Programm zu definieren: 11 IF A$ 
= "x" THEN END:REM BEENDEN DES PROGRAMMS DURCH EINGABE VON X.) 


Eine andere einfache Art, Konvertierungen auszuführen, beruht auf 


der Tatsache, daß jedes Bit nur die Werte 0 oder 1 enthalten 
kann. Sehen wir uns dies genauer an: 


Hallo 
| Ich bin ein 
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0 +64 +0 +16 +8 + 0 + 2+ 0 =9 


Um unsere dezimale Zahl zu ermitteln, brauchen Sie nur die Zahlen 
in der Reihe "WERT" zu addieren. 


Eine naheliegende Frage ist: "Lohnt es sich, sich so zu quälen?" 
Nun, da Sprites aus kleinen Punkten bestehen, die durch die ver- 
schiedenen Bits ("on" oder "off") erzeugt werden, ist dies not- 
wendig. Sie können aber auf diese Art jede beliebige Form erzeu- 
gen, indem Sie die Bits ein- oder ausschalten. Durch die Konver- 
tierung dieser Binärmuster in dezimale Werte, können wir diese 
vom BASIC aus poken. Sehen wir uns zu Beginn an, wie unser "Raum- 
schiff" erzeugt wurde. Hier ist alles, was Sie dazu brauchen: 


is Kariertes Papier. 
2: Bleistift und Radiergummi. 
3% Ein Lineal. 


Zeichnen Sie auf das Papier eine Matrix, 24 Karos breit und 21 
hoch. Teilen Sie die Matrix vertikal in drei gleiche Spalten. 
Jede Spalte ist nun 8 Karos breit und 21 hoch; jede Reihe besteht 
aus 3 Spalten von jeweils 8 Karos. Die 3 Spalten stellen 3 Bytes 
dar, genau wie in der Zeichnung im Buch. Da wir 21 Reihen und 3 
Bytes pro Reihe haben, sind in unserem Block 21 x 3 oder 63 
Bytes. Jeder Block stellt eine Grafik dar. Wir benutzen für das 
"Raumschiff" nicht jede Reihe, müssen den Block aber trotzdem als 
Gesamtheit betrachten. Wir lesen unsere Reihen von links nach 
rechts und stoppen zu Beginn jedes neuen Bytes. Wenn Sie das Kon- 
vertierungsprogramm des COMMODORE-64-HANDBUCHs benutzen, geben 
Sie die Zahlen des am weitesten links liegenden "Karos" oder 
"Bits" bis hin zu dem am weitesten rechts liegenden Bit des, Bytes 
ein. VERWECHSELN SIE DIE EINZELNEN BITS NICHT! 


Werfen wir einen Blick auf die folgende Figur, um zu sehen, wie 
die Spritegrafik entstanden ist. 
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0,0,0 
0,0,0 
0,0,0 
0,0,0 
0,0,0 
2,0,64 
2,0,64 
2,24,64 
2,60,64 
2,102,64 
3,255,192 
2,60,64 
2,24,64 
2,0,64 
2,0,64 
0,0,0 
0,0,0 
0,0,0 

'T 0,0,0 
0,0,0 
0,0,0 


DD Aa Aa ae >se>se,>se,>se se 
SS DD Na BO N + OB BB nam a2 on - 


n 
- 





Bei unserer Grafik geben wir in die ersten fünf Reihen keinerlei 
Information ein. Wir könnten für Reihe 1 - 5 genauso gut schrei- 
ben: DATA 0,0,0. Da wir unser "Raumschiff" aber in der Mitte des 
Blocks ausgeben möchten, gibt es keinen Grund dazu. (In einigen 
Anwendungen ist es jedoch erforderlich!) Ebenso enthalten die 
letzten sechs Reihen keinerlei Information. Wir können diese also 
leer lassen oder Nullen eingeben. Bei Anwendungen, in denen Sie 
mehrere Grafiken im gleichen Speicherbereich benutzen, müssen Sie 
den Block komplett füllen, um die unerwünschten Punkte der vor- 
hergehenden Figur zu löschen. Sehen wir uns an einer Reihe an, 
wie ein Teil der Zeichnung konvertiert wird. 


BYTE #1 
Mr Paar or Tor er Tr Guerar n 
BITNR. 7 zZ Da rn BEER ERNE 
a 
ZEIT IT IZTELITTT 
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BYTE #2 
BT IB MO EB Aa 2 1 
BER ee 
Tr Tr rn na —n 
Ho o0H 00H 0 +0 0 = 0 
BYTE #3 
WERT 128 Fa 2 0160 e. Fa Dr ne 
BI. 70 "TE a Fa Saga oo ee 
u a a Ba a ae a a 
— 0 +6 +0 + 040 +0 +40 +0 = 64 


Obwohl dieser Prozeß kompliziert und anspruchsvoll aussieht, ist 
er eher eine Frage der Organisation als der Komplexität. Vor al- 
lem ist das Zeichnen der Grafik auf Karopapier sehr einfach, und 
wenn Sie dann die detaillierte Grafik erhalten, ist das der Lohn 
für all Ihre Mühe. Wenn Sie Grafiken wie in unserem Beispiel er- 
stellen, wiederholen sich auch oft Reihen. Wenn Sie erst die Wer- 
te dieser Reihen herausgefunden haben, brauchen Sie diese nur in 
die DATA-Zeile erneut eingeben. 


Im nächsten Schritt werden wir Anweisungen für Tricks geben. Als 
erstes müssen wir uns über die Überlagerung des Bereichs, durch 
den wir uns bewegen, im klaren sein. Im Grunde ist es eine 320 x 
200-Matrix. Wir können 320 Punkte oder Pixels horizontal und 200 
vertikal bewegen. Ein Bereich ist jedoch 24 Pixels breit und 21 
hoch. Wenn die Grafik fertiggestellt ist, wird der gesamte Be- 
reich auf dem definierten Teil des Bildschirms ausgegeben und auf 
diesem fortbewegt. Um den Bereich über den Monitor zu bewegen, 
stellen wir uns den Bildschirm als ein Feld mit x- und y-Koordi- 
naten vor. Die Position 160,100 stellt genau die Mitte dar. Der 
x-Wert bringt Sie nach rechts und der y-Wert nach unten. 
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Sichern Sie Ihre Grafik 


Wenn Sie mit der Erstellung der Grafik fertig sind, wäre es 
gut, das Programm auf Diskette oder Band abzuspeichern. In- 
dem Sie Zeilennummern größer 500 benutzen, brauchen Sie bei 
folgenden Programmen nur die DATA-Zeilen in den Speicher zu 


laden und anschließend die Parameter der darunterliegenden 
Zeilen zu definieren. Sie können damit Reihen der Grafik 
abändern oder neue Reihen hinzufügen. Sie müssen so nicht 
alle Grafiken erneut eingeben, sondern erstellen neue Gra- 
fiken durch die Modifizierung der alten oder durch Hinzu- 
fügen weiterer DATA-Zeilen. 





Bevor wir zu den Bewegungen kommen, müssen wir unsere Bereichsda- 
ten in den Speicher bringen und den Grafikbereich einrichten. In 
unserem Beispiel benutzen wir die Variable BG für den Beginn des 
Grafikbereichs, "Beginn Grafik" (BG = 53248). Die meisten anderen 
Speicherbereiche stellen eine Distanz zu BG dar. Wir benutzen 
folgende Variablen: 


BG = 53248 - Beginn des Grafikbereichs 
TU = BG + 21 - 1äßt einen Bereich erscheinen oder 
löscht ihn. TU steht für "Turn on" 
eines definierten Bereichs oder einer 
Reihe von Bereichen. 
SI =2 - Wert der Bereichs #1. Bereichswerte 
sind: 
s0 = 1 
si = 2 
52 = 4 
S3 = 8 
S4 = 16 
S5 = 32 
Ss6 = 64 
S7 = 128 
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u. 
I 


2040 - Distanz der Bereiche mit Angabe der Be- 
reichsnummer, nicht des Wertes. Zum Bei- 
spiel: Bereich 0 = 0, Bereich 1 = 1, 
Bereich 2 = 2 usw. 2040 bis 2047 wird 
dazu benutzt, die Zeiger (Pointer) zu 
setzen, nicht zum Hinterlegen von Daten. 


SS 


832 - Beginn des Bereichsspeichers. Hier wer- 
den die tatsächlichen Daten gespeichert. 
Es können 3 Gruppen von Datenspeichern 
benutzt werden. 832, 896(832 + 64) und 
960 (895 + 64). Sie müssen getrennt ge- 
halten werden und dürfen sich nicht 
überlagern, außer Sie möchten für den 
Bereich die doppelte oder dreifache Grö- 
ße. Wir benutzen nur die erste Angabe. 


SL = 13 - Speicher-"Block" (832/63) für den 
Datenbeginn bei 832. Für den Beginn bei 
895 wird SL = 14, für 958 = 15 
festgelegt. 


x1 


BG + 2 : Yi = BG + 3 - Die Werte stellen die 
x- und y-Koordinaten für den Bereich #1 
dar. Alle x-/y-Paare beginnen für Be- 
reich 0 mit 0,1; für Bereich 1 mit 2,3; 
für Bereich 2 mit 4,5 usw. 


Um zu sehen, wie diese Variablen eingesetzt werden, gehen wir 
Schritt für Schritt durch das Programm und beginnen dabei mit 
Zeilennummer 200: 


FOR R = 0 TO 29:READ D:POKE SS + R,D:NEXT R 

Wir lesen hier unsere DATA-Anweisungen von 500-520 und 
hinterlegen die den einzelnen Werten entsprechenden 
Pixel in fortlaufenden Speicherbereichen, beginnend bei 
832 (SS + 0). 


POKE TU, S1 
Dies aktiviert Bereich 1. 


POKE L + 1, SL 


Dies legt fest, daß die Daten von Block SL für Bereich 
#1 bestimmt sind. 
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POKE Yi1, 100 
Die y- oder vertikale Position soll sich an Stelle 100, 
in der Mitte des Bildschirms befinden. 


FOR H = 0 TO 255 


POKE X1, H: NEXT H 

Dies bewegt den Bereich aus der horizontalen Position 0 
nach 255. Die vertikale Position verbleibt auf 100; wir 
erreichen hiermit nur eine horizontale Bewegung. 


Machen Sie sich keine Gedanken, wenn Sie im Moment noch nicht al- 
les genau verstehen. Warum Informationen an bestimmten Speicher- 
stellen und nicht an anderen gespeichert werden oder warum Blöcke 
gepokt werden, ist nicht das Hauptproblem. Beachten Sie die Rei- 
henfolge der Kommandos und schauen Sie, was sich ereignet, wenn 
Sie Werte ändern. Welchen Wert müssen Sie z.B. verändern, wenn 
Sie den Sprite #3 anstelle des Sprites #1 aktivieren möchten? Wie 
können Sie erreichen, daß Ihr Sprite vertikal statt horizontal 
oder im Zickzack bewegt wird? Um dies herauszufinden, geben Sie 
Änderungen ein und wiederholen Sie die oben beschriebenen Varia- 
blen, bis Ihr Sprite die gewünschte Lage erreicht hat. 


Farbe, Erweiterungen und die Kontrolle des gesamten Bildschirms 
ın Verbindung mit der Spritegrafik 


Da wir jetzt einiges über die Erstellung und Bewegung von Sprites 
wissen, sehen wir uns an, wie wir ihre Farbe verändern, sie er- 
weitern und sie zu einer fortgesetzten Aktivität bringen können. 
Wir nehmen dazu unser Beispielprogramm und erweitern die verti- 
kale sowie die horizontale Achse unseres Sprites. Wir benutzen 
folgende Variablen: 


EX BG + 29 Adresse der X-Achsenerweiterung 
EY = BG + 23 Adresse der Y-achsenerweiterung 


Fügen Sie folgendes zu Ihrem Programm: 


85 EX = BG + 29: EY = BG + 23 
225 POKE EX,S1: POKE EY,S1 
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Geben Sie jetzt RUN ein, bewegt sich Ihr Sprite in einer größeren 
Abmessung über den Bildschirm. Möchten Sie auch die Farbe ändern? 
Nun, dann fügen wir noch ein paar Variablen hinzu: 


C BG + 39 Beginn der Farbadresse 


C1=cC + 1 Farbadresse für Sprite #1. Benutzen Sie die 
Spritenummer als Distanz (0 - 7). 


POKE C1,2 Auswahl der Farbe Rot (2). Farbauswahl (0 - 
15). 


Um die Farbvariablen ins Programm zu integrieren, fügen Sie 
folgende Zeilen hinzu: 


87 C = BG +39: CI =C +1 
227 POKE C1,2 


Sie sollten jetzt ein großes rotes "Raumschiff" sehen, daß sich 
über den Bildschirm bewegt. Sie ändern die Farbe durch Eingabe 
der verschiedenen Werte, die in Zeile 227 nach Ci gepokt werden. 


Als nächstes bewegen wir unser Sprite fortlaufend über den Bild- 
schirm. Dies beinhaltet das "Aktivieren" (turn on) des "most sig- 
nificant" (bedeutendsten) Bytes (MSB). Sie sollten sich keine 
großen Gedanken darüber machen, was ein '"MSB" ist, sondern dabei 
an einen "Bildschirmausbau" oder an das "rightmost screen move- 
ment" denken. Wir werden es zuerst "anschalten", unser Sprite be- 
wegen, dann wieder "ausschalten" und zur Ausgangsposition zu- 
rückkehren. Das Ergebnis ist eine ununterbrochene Bewegung über 
die volle Bildschirmfläche. 


RS = BG + 16 Rechte Bildschirmadresse 


Jetzt möchten wir die letzten 64 Punkte auf die rechte Seite des 
Bildschirms bewegen und benutzen dazu eine Schleife von 0 bis 63. 
Fügen Sie folgende Zeilen hinzu: 


88 RS = BG + 16 

252 POKE RS,S1 

254 FOR HH = 0 TO 63:POKE X1,HH:NEXT HH 
256 POKE RS,0 
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Da wir nun die Tricks kennen, lassen Sie uns ein weiteres Sprite 
in unser Programm einfügen. Wir werden die beiden Sprites unab- 
hängig voneinander bewegen und sie in verschiedenen Farben und 
unterschiedlichen Größen darstellen. Als erstes müssen wir ein 
weiteres Sprite zeichnen. Ich habe hier auch gleich noch ein an- 
deres "Weltraum-Sprite" zur Hand. Fügen Sie zuerst die folgenden 
DATA-Zeilen hinzu: 


600 DATA 0,8,0,0,28,0,3,255,224,6,127,48,12,62,24 
610 DATA 24,28,12,112,8,7 


Wir erstellen nun unser zweites Sprite, indem wir Sprite #4 
modifizieren. Ändern Sie die folgenden Zeilen an Ihrem Programm: 


40 SI = 2:54 = 16 

80 X1 = BG + 2:Yl = BG + 3:X4 = BG + 8:Y4 = BG + 9 

87 C = BG + 39:C1 = C + 1:C4=C+4 

205 FOR R = 0 TO 20:READ D:POKE (SS + 64) + R,D:NEXT R 
210 POKE TU,S1 + S4 

220 POKE L + 1,SL:POKE L + 4,SL + 1 

227 POKE C1,13:POKE C4,10 

245 POKE X4,H:POKE Y4,H 


Das ist alles. Gehen wir das Programm Zeile für Zeile noch einmal 
gemeinsam durch: 


Zeile 40: wir fügen den Wert (16) des Sprite #4 hinzu 


Zeile 80: die x- und y-Werte für Sprite #4 werden hinzuge- 
fügt 


Zeile 87: die Farbadresse für Sprite #4 wird definiert 


Zeile 205: wir lesen die Daten für Sprite #4 ein und benut- 
zen eine Distanz von 64, um die Daten in Block 


#14 zu speichern 


Zeile 210: wir aktivieren (turn on) Sprite #1 und Sprite #4. 
(Beachten Sie, daß dies durch Aneinanderfügen der 
beiden Sprites erreicht wird, das ist besser als 
durch zwei separate POKESs. 
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Zeile 220: die Distanz für den Adressenpointer des zweiten 
Sprites wird gepokt und festgelegt, so daß diese 
im nächsten Block (SL + 1) zu finden ist. 


Zeile 227: wir fügen die Farbe für Sprite #4 hinzu - 
hellrot, Color #10. 


Zeile 245: die X- und Y-Position für Sprite #4 werden hin- 
zugefügt. 


Das war alles über die Sprites. Inwieweit Sie dieses neue Wissen 
nun selbst einsetzen, bleibt Ihnen überlassen. Die Anwendung ist 
etwas komplizierter als unsere bisherigen Übungen. Wenn Sie aber 
Ihre Programme in Blöcken organisieren, erkennbare Variablen ein- 
setzen und die Reihenfolge einhalten, werden Sie doch eine Menge 
mit den Sprites erreichen. Mit Sprites ist die Belebung des Bild- 
schirms viel einfacher als mit den vorher besprochenen Methoden. 
Wir müssen unsere Sprites nicht "löschen" und Sie haben viel- 
leicht bemerkt, daß ein Sprite sich "hinter" dem anderen fortbe- 
wegen kann. Da sich Sprites gut bei Figuren einsetzen lassen, 
können Sie auch weitaus mehr Formen erzeugen als mit anderen Gra- 
fikzeichen. 


7.4 Zusammenfassung 


Das Kapitel führte uns durch die Welt der Computergrafik. Begin- 
nend mit Bildschirmgrafik, haben wir gesehen, wie Sie Text und 
Grafik kombinieren können, um damit Bilder zu erzeugen. Weiter 
haben wir gelernt, wie wir Bilder auf dem Bildschirm bewegen 
können, indem wir sie in verschiedene Bildschirmbereiche poken, 
sie löschen, um sie dann an einer anderen Position wieder er- 
scheinen zu lassen. Wir haben auch herausgefunden, wie wir unse- 
rer Grafik Farbe geben, entweder von der Tastatur aus oder durch 
Poken verschiedener Farbwerte. Durch die Programmierung von Dis- 
tanzen konnten wir unsere Figuren und Farben koordinieren. 


Der letzte Teil unserer Erforschung der Grafik führte uns in die 
Welt der Sprites. Ausgehend von einer Zeichnung auf Karopapier, 
haben wir unsere Kreationen durch Übersetzung der Figuren in den 
Binärcode in den Hauptspeicher des Computers übernommen. Weiter 
haben wir gelernt, wie wir die Informationen in den Speicher 
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bringen und ein sich bewegendes Sprite ausgeben können. Dann ha- 
ben wir Farbe in das Ganze gebracht, das Sprite vergrößert und 
auf dem Bildschirm bewegt. Zum Schluß haben wir geübt, wie wir 
mehrere Sprites erzeugen und diese gleichzeitig bewegen können. 


An dieser Stelle soll deutlich gemacht werden, daß sich Computer- 
grafik nicht nur für Spaß und Spiel, sondern ebenso gut für prak- 
tische Anwendungen eignet. Wir haben zum Beispiel gesehen, wie 
man Grafiken mit den Grafiktasten erstellt, aber Sie können auch 
Spritegrafiken im Programm verwenden, um etwas deutlicher oder 
interessanter darzustellen. Wenn wir mit Spritegrafik und sich 
bewegenden Bildern arbeiten, denken wir natürlich zuerst an 
Spielprogramme. Setzen Sie sich jedoch bei der Anwendung von Gra- 
fiken hier keine Grenze. Versuchen Sie, diese zur Steigerung der 
Aussagekraft von Informationen einsetzen oder auf andere kreative 
Art zu nutzen. 
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Einführung 


In diesem Kapitel werden Sie mehr über fortgeschrittene Anwendun- 
gen mit dem Band- oder Diskettensystem lernen. Wir besprechen 
zwei Arten von Dateien: (1) Datendateien und (2) sequentielle 
Textdateien. Es gibt einige Ähnlichkeiten zwischen Daten- und se- 
quentiellen (fortlaufend angelegt) Textdateien. Ihre Datendateien 
auf Diskette stellen eine Art sequentielle Datei dar, und wir 
können sogar sagen, daß die Methode, mit der Ihr Kassettengerät 
Daten speichert, eine Form von sequentieller Textdatei ist. Wir 
werden sie jedoch der Klarheit halber getrennt besprechen. 


Bevor wir beginnen, möchte ich betonen, daß das COMMODORE-Disket- 
tensystem sehr gut entwickelt ist. Für Anfänger kann es schwierig 
sein, einige der höherentwickelten Anwendungen zu verstehen. Au- 
Berdem besteht große Gefahr, Programme oder Daten auf der Disket- 
te zu zerstören. Aus diesem Grund werde ich, trotz des Risikos, 
weitschweifig zu scheinen, die Abschnitte langsam durcharbeiten 
und die verschiedenen Funktionen der Kommandos für Ihr Disketten- 
system erklären. Allerdings werden wir die komplizierteren Mög- 
lichkeiten des Disk-Operating-Systems nicht behandeln, da dies 
über die Zielsetzung dieses Buches hinausgehen würde. Ich empfeh- 
le Ihnen, eine leere formatierte Diskette für die Übung zu ver- 
wenden und Ihre Programmdisketten dadurch vor unbeabsichtigtem 
Löschen oder Überschreiben zu schützen. 


8.1 Datendateien auf Band 


Wäre es nicht vorteilhaft, wenn man große Datenmengen nach der 
Eingabe auf Band abspeichern könnte? Nehmen wir zum Beispiel an, 
Sie haben ein umfangreiches Sprite erstellt und möchten es in 
einem anderen Programm verwenden. Anstatt alles neu einzugeben, 
können Sie die Daten in jedes andere Programm laden. Nun, durch 
die Benutzung einer Datendatei können Sie dies und vieles andere 
durchführen. Sie können jede Art von Daten, numerische oder al- 
phanumerische, auf Band sichern und mit Hilfe einer Reihe spe- 
zieller Kommandos, die Sie noch lernen werden, direkt in ein Pro- 
gramm laden. Sie können ein Scheckbuch-Programm erstellen, das 
alle Ihre Schecks und Salden auf Band sichert; eine Adressenliste 
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erstellen, die Namen, Adressen und Telefonnummern erzeugt, si- 
chert und holt, und sogar eine Liste Ihrer Lieblingsrezepte an- 
legen. 


In Kapitel 1 und 2 haben wir besprochen, wie Sie unter Verwendung 
der Commodore-C2N-Kassetteneinheit mit SAVE ein Programm abspei- 
chern und es mit LOAD wieder in den Speicher des COMMODORE-64 
bringen. Beide Kommandos werden im Kommandomodus ausgeführt. Die 
Kommandos, die wir jetzt besprechen, werden im Programmodus aus- 
geführt, auch wenn sie genauso Informationen auf Band abspeichern 
oder laden. Sie machen es in einem anderen Format. Zu Beginn wol- 
len wir die unterschiedlichen Kommandos zur Bearbeitung von Da- 
tendateien wiederholen. Dann sehen wir uns dazu ein paar Pro- 
gramme an. 
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8.2 OPEN, INPUT#, PRINT# und CLOSE 


Um Informationen von der Kassette zu lesen oder Daten aus dem 
Programm abzuspeichern, muß das Band durch einen OPEN-Befehl 
"vorbereitet" werden, der folgendes Format hat: 


OPEN N,1,(0,1 or 2) ‚,"DATEINAME" 


"N" kann jede Ganzzahl zwischen 1 und 255 sein, um eine Beziehung 
zur Datei herzustellen. Wenn Sie z.B. Ihre Datei mit der Zahl 21 
ansprechen wollen, würden Sie schreiben: 


OPEN 21, usw. 


Da das Gerät als Kassettenrecorder angemeldet wird, ist die zwei- 
te Ziffer eine "1". Sie benutzen bei der Kassette immer die 


ziffer "1", bei der Diskette immer "8", 
OPEN 21,1, usw. 


Ihre Datei ist mit einer "0" immer zum Lesen vorbereitet, mit 
einer "1" oder "2" zum Schreiben. Benutzen Sie die "1" für das 
Schreiben mit einer End-Of-File-Marke (Ende der Datei), die "2" 
für eine End-Of-Tape-Marke (Ende des Bands). 


OPEN 21,1,0, etc. Lesen einer Datei 

OPEN 21,1,1, etc. Schreiben einer Datei mit End-Of- 
File-Marke 

OPEN 21,1,2, etc. Schreiben einer Datei mit End-Of- 
Tape-Marke 


Stellen Sie einen Namen für Ihre Datei bereit. Angenommen, Sie 
möchten Ihr erstelltes Sprite mit Daten einer Rakete abspeichern 
und nennen es "RAKETENSPRITE". Sie schreiben 

OPEN 21,1,1,"RAKETENSPRITE" oder 

OPEN 21,1,2,"RAKETENSPRITE" 


Um die Daten zu lesen, würden Sie eingeben 


OPEN 21,1,0,"RAKETENSPRITE". 
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Dies mag kompliziert erscheinen; wenn Sie aber geübter sind, ist 
es sehr einfach. Zur gleichen Zeit sind Sie sehr flexibel, da es 
möglich ist, eine Anzahl verschiedener Dateien durch Vergabe ver- 
schiedener Namen zu eröffnen. Gewöhnlich schließen Sie eine Datei 
jedoch, bevor Sie eine andere eröffnen. Um eine Datei zu schlie- 
ßen, geben Sie CLOSE und die Dateinummer an. In unserem Beispiel 
geben wir ein: 


CLOSE 21 


während Sie sich beim OPEN an manches erinnern müssen, ist es 
beim CLOSE umso weniger. 


Das nächste Kommando bewirkt das Schreiben von Daten auf Band. 
wir führen dies mit dem PRINT#-Kommando aus. Das Format ist 


PRINT# ,N,D 


wobei "N" für die Dateinummer und "D" für die Daten steht. Für 
unser Beispiel würden wir eingeben: 


PRINT#21, etc. 

Wenn die Daten durch einen String dargestellt werden geben wir 
PRINT#21 ‚AS 

ein und bei numerischen Daten: 
PRINT#21,A (oder A% für Ganzzahlen). 


Denken Sie daran, daß PRINT# nicht dasselbe ist wie PRINT. Sie 
können deshalb auch kein Fragezeichen (?) dafür einsetzen, wie es 
bei PRINT möglich ist. Wenn Sie ?# eingeben und das Programm lau- 
fen lassen, erhalten Sie eine Fehlermeldung. Wenn Sie das Pro- 
gramm auflisten, erscheint es als PRINT#. Um Ihnen dies zu zei- 
gen, probieren Sie folgendes aus: 


10 ?#1,5 
20 PRINT#1,5 


Geben Sie nun RUN ein, erhalten Sie ?SYNTAX ERROR IN 10. Geben 
Sie stattdessen RUN 20 ein, sehen Sie auf dem Bildschirm ?FILE 
NOT OPEN ERROR IN 20. Das Format in Zeile 20 ist zwar korrekt, 


200 


Dateiverabeitung 


aber weil die Datei nicht eröffnet wurde, erhalten Sie eine Feh- 
lermeldung. Listen Sie das Programm jetzt auf. Sie sehen, daß 
Zeile 10 und Zeile 20 nun identisch sind. Daher ist LIST nicht 
immer bei der Fehlersuche hilfreich. Denken Sie also daran und 
benutzen Sie bei PRINT# kein ? als Kürzel. 


Genauso wie PRINT# Daten auf das Band ausgibt, holt INPUT# Daten 
vom Band in Ihren Computer. Es hat das gleiche Format wie PRINT# 
und benutzt die geöffneten Dateien, um numerische Variablen oder 
Strings einzulesen. 


INPUT#21,A (oder A% für Ganzzahlen) - Zahlen 
INPUT#21 ‚AS - Strings 


Schließlich haben wir noch die GET#-Anweisung, die das gleiche 
Format wie INPUT# hat, jedoch wie die GET-Anweisung nur ein Zei- 
chen nach dem anderen annimmt. Sie liest jedoch Kommas, Doppel- 
punkte und andere Zeichen, was INPUT# nicht kann. GET# wird nicht 
häufig benutzt, da die meisten Anwendungen das Einlesen längerer 
Strings erfordern. Möchten Sie jedoch spezielle Zeichen einlesen, 
was mit INPUT# nicht möglich ist, ist GET# sehr nützlich. 


Wir haben also Kommandos zur Verfügung, um eine Datei zu eröff- 
nen, auf eine Datei zu schreiben oder von ihr zu lesen, und um 
eine Datei zu schließen. Bevor wir weitermachen, müssen wir uns 
noch eine spezielle Variable, ST, ansehen. Die Variable ST ist 
reserviert, um zu prüfen, ob das Einlesen von Daten vom Band be- 
endet ist. Wenn ST = O0 ist, sind noch mehr Daten zu erwarten. Die 
End-Of-File oder End-Of-Tape-Marke wurde noch nicht gelesen. 
Somit ist es möglich, nach einer IF/THEN-Abfrage mit der Variab- 
len ST in einer Schleife zum Lesen zurückzuspringen. Es kann z.B. 
folgendes Format benutzt werden: 


20 INPUT#21 ,AS$ 
30 PRINT AS 
40 IF ST = 0 THEN 20 


Zeile 40 prüft ab, ob sich noch Daten auf dem Band befinden. 
Wenn ja, verzweigt das Programm zu Zeile 20, um diese einzulesen. 


Wir haben jetzt alle Kommandos zum Lesen und Schreiben von Datei- 
en auf Band kennengelernt. Sehen wir uns noch eine praktische An- 
wendung dazu an. Wir erstellen eine Liste mit den Telefonnummern 
unserer Freunde. Zuerst müssen wir eine Liste zur Eingabe der Da- 
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ten erstellen und diese dann auf Band sichern. Dann schreiben wir 
ein Programm, um die Namen und Telefonnummern einzulesen. 


10 PRINT CHRS (147) 

20 REM **%* DATENEINGABE *** 

30 INPUT "WIE VIELE NAMEN WOLLEN SIE EINGEBEN" ;N% 
40 PRINT.DIM NAS(N%) ,PHS(N%) 

50 FOR I=1 TO N% 

60 PRINT "NAME #";1;:INPUT "VORNAME NACHNAME" ;NAS(I) 
70 INPUT "TELEFONNUMMER (XXXX/XXXXXXX)";PHS(I) 

80 NEXT I 

100 REM *%** DATEN AUF BAND SPEICHERN *** 

110 OPENI ‚1,1 "TELEFON" 

120 FOR I=1 TO N% 

130 PRINT#1,NAS (I) 

140 PRINT#1,PHS(I) 

150 NEXT I 

160 CLOSE1 


Legen Sie ein leeres Band ein und spulen Sie die Kassette zurück. 
Geben Sie RUN und die gewünschten Daten ein. Sobald Sie die Play- 
und Recordtaste Ihres Kassettengerätes drücken, leert sich der 
Bildschirm und das Band dreht sich. Sind alle Informationen ab- 
gespeichert, stoppt das Band und auf dem Bildschirm erscheint die 
Meldung, daß alle Ihre Daten gespeichert wurden. (Das Speichern 
auf Band dauert im Vergleich zur Diskette relativ lange. Es ist 
zu Beginn ratsam, zu Testzwecken nur wenige Namen einzugeben.) 


Lassen Sie uns kontrollieren, ob alles nach Plan gelaufen ist. 
Dazu brauchen wir ein Programm, das unsere Daten einliest. Wir 
benutzen dazu INPUT#. Da sowohl die Namen als auch die Telefon- 
nummern als String abgespeichert wurden, lesen wir beides mit 
einer einzigen Stringvariablen ein. Wir nennen sie DA$ für "DATEN 
STRING". (Denken Sie daran, Ihr Band zurückzuspulen, bevor Sie 
RUN eingeben. ) 


10 PRINT CHRS(147) 

20 OPEN] ‚,1,0,"TELEFON" 
30 INPUT#1 ,DAS 

40 PRINT DAS 

50 IF ST=0 THEN GOTO 30 
60 CLOSEI 
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Wenn Sie RUN eingeben, werden Sie mit PRESS PLAY ON TAPE aufge- 
fordert, Ihren Kassettenrecorder in Betrieb zu nehmen. Der Bild- 
schirm leert sich erneut und nach einer Weile erscheint Ihre 
Textausgabe mit allen Namen und Telefonnummern, die Sie eingege- 
ben haben. Hier werden Sie sagen: "Moment mal. Ich habe die Daten 
durch zwei verschiedene Stringelemente eingegeben, und dieses 
Programm liest nur eine Stringvariable! Was ist mit den Elementen 
geschehen, und wie ist es möglich, alle Informationen mit einer 
Stringvariable zurückzuholen?" 


Die Antwort auf diese Frage beruht auf der Art, wie die Daten 
eingegeben werden. Nach der Eröffnung der Datei haben wir ihr die 
Daten mit INPUT# entnommen. Sobald sie im Hauptspeicher waren, 
haben wir sie mit unserem BASIC-PRINT-Befehl ausgegeben und nicht 
mit der PRINT#-Anweisung, mit der wir die Daten auf das Band aus- 
gegeben haben. Der Computer kümmert sich nicht darum, ob die be- 
reitgestellten Daten Namen oder Telefonnummern sind. Sie sind nur 
ein String, den er ausgibt, sobald sich dieser im Speicher befin- 
det. Da der Bildschirm zu diesem Zeitpunkt noch dunkel war, konn- 
ten wir dies nicht verfolgen. In Zeile 50 prüft das Programm, ob 
sich noch mehr Informationen in der Datei befinden, nimmt diese 
auf und gibt den nächsten String aus, ohne Rücksicht darauf, ob 
es sich dabei um einen Namen oder eine Telefonnummer handelt. Um 
dies zu testen, geben Sie nur PRINT DAS im Kommandomodus ein, und 
der letzte Satz erscheint am Bildschirm. 


Bauen wir unserer Programm noch ein bißchen aus. Wenn Sie es be- 
nutzen, um die Telefonnummern Ihrer Freunde einzugeben, wird die 
Liste wahrscheinlich länger als ein Bildschirm werden. Sie können 
deshalb nur die Namen und Telefonnummern lesen, die sich noch auf 
dem Bildschirm befinden. Wir brauchen also ein Programm, das nach 
einem speziellen Namen sucht, diesen findet, die Datei schließt 
und den gefundenen Namen und die Telefonnummer auf dem Bildschirm 
ausgibt. 


10 PRINT CHR$(147) 

20 INPUT "WELCHEN NAMEN WOLLEN SIE SUCHEN" ;NAS 
30 OPENI ‚1,0, "TELEFON" 

40 INPUT#1 ‚DAS 

50 IF DA$S=NA$S THEN GOTO 100 

60 IF ST=0 THEN GOTO 40 

70 PRINT "NAME NICHT GEFUNDEN" 

80 CLOSEI 

90 END 
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100 REM *%*%* NAME UND TELEFONNUMMER EINGEBEN **%* 
110 PRINT DAS$S:REM NAMEN DRUCKEN 

120 INPUT#1,DA$:REM TELEFONNUMMER EINLESEN 

130 PRINT DA$.REM TELEFONNUMMER DRUCKEN 

140 CLOSEI 


wir haben nun ein nettes Programm für die Speicherung einer 
Telefonliste und das Auffinden eines einzelnen Namens mit Tele- 
fonnummer auf Band. Das nächste Problem ist: wie aktualisiere ich 
die Datei, ohne alle Daten erneut einzugeben? Dies trifft z.B. 
zu, wenn Sie in eine bestehende Telefonliste einen neuen Namen 
einfügen möchten. Können wir das? Natürlich! Aber zuerst müssen 
wir alle Namen vom Band in den Speicher lesen und sie dann wieder 
zurückzuschreiben. Dafür gibt es verschiedene Möglichkeiten. 
Unser Beispiel ist nur eine davon. Wir machen folgendes: 


1. Laden Sie alle Namen und Telefonnummern in eine Tabelle. 

Di Geben Sie neue Namen und Telefonnummern am Tabellenende ein. 

3% Spulen Sie das Band zurück und speichern Sie die Daten er- 
neut ab. 


10 PRINT CHRS(147) 

20 DIM NAS(30),PH$(30) :REM PLATZ FÜR DIE NAMEN + RESERVE 
30 OPENI ‚1,0, "TELEFON" 

40 N=0:REM ZÄHLER INITIALISIEREN 

50 INPUT#1,NAS(N) 

60 INPUT#1,PHS(N) 

7TON=N +1 

80 IF ST=0 THEN 50 

90 CLOSEI 

100 REM **%* DATEN ANFÜGEN **%* 

110 INPUT "WIE VIELE NEUE NAMEN ANFÜGEN";NN 
120 FOR I=(N+1) TO (N+NN) 

130 INPUT "NAME";NAS(I) 

140 INPUT "TELEFON";PH$S(I) 

150 NEXT I 

200 REM *%** ALTE UND NEUE DATEN SPEICHERN **%** 
210NP=N + NN 

220 OPENI ‚1 ,1,"TELEFON" 

230 FOR I = 0 TO NP 

240 PRINT#1,NAS(I) 

250 PRINT#1 ,PHS (I) 

260 NEXT I 

270 CLOSEI 
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Vergewissern Sie sich, daß Ihr Band zurückgespult ist, sobald al- 
le Daten im Speicher sind. Fügen Sie zur Sicherheit folgende Zei- 
le an: 


105 PRINT CHR$(147) :PRINT "SPULEN SIE IHR BAND ZURÜCK!":PRINT: 
INPUT "WEITER MIT <RETURN>";RTS 


Jetzt können Sie es nicht vergessen. 


Sehen wir uns nun an, wie Sie Sprites auf Band sichern können. 
Weiterhin werden wir sehen, wie wir die Informationen vom Band 
laden und ein Programm starten können, das diese Daten benutzt. 
An dieser Stelle jedoch eine Warnung: manchmal sind auf dem Band 
mehr Informationen, als Sie brauchen. Es ist daher wichtig, in 
den Speicher nur das zu laden, was Sie brauchen. Alles andere 
wird ignoriert. Dies ist ein bißchen unbequem, da Sie die gesam- 
ten Daten im Auge behalten müssen und auch die Abgrenzungen Ihres 
Sprites kennen müssen. Da diese Informationen jedoch in jedem 
Fall notwendig sind, dürfte es Ihnen nicht allzu schwer fallen. 


Zuerst erstellen wir ein Sprite und sichern es auf Band. Es soll 
wie eine Rakete aussehen. 


10 PRINT CHR$ (147) :REM***ERSTELLUNG DES SPRITES*** 

20 DIM RS(63) 

30 FOR I = 0 TO 32:READ RS(I) :NEXT 

40 DATA 30,0,0,31,0,0,31,128,0,31,255,192,192,31,255,240,31, 
255,248 

50 DATA 31 ,255,240,31,255,192,31,128,0,31,0,0,31,0,0 

60 FOR I = 33 TO 62:RS(I)=0:NEXT I:REM REST MIT NULLEN AUFF. 
100 REM *%*%* BEGINN DATENSPEICHERUNG AUF BAND *%% 

110 OPENI1,1,1,"RAKETE" 

120 FOR I = 0 TO 62 

130 PRINT#1,RS(I) 

140 NEXT I 

150 CLOSEI 


Wir haben das Sprite in der uns gewohnten Weise erstellt. Sorgen 
Sie dafür, daß kein "Schund" in das Sprite gerät, indem Sie die 
leeren Reihen des Sprite mit "0" füllen. Wenn Sie jetzt die Daten 
vom Band laden, wissen Sie, egal wie das Sprite aussieht, daß 63 
(0 bis 62) "Informationsteile" geladen werden. Daher müssen wir 
beim Laden der Daten nicht lang überlegen, wie diese im Speicher 
stehen. Durch die Benutzung der maximalen Anzahl an Bytes benöti- 
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gen die kleinsten wie die größten Sprites jeweils 63 Bytes. Wenn 
das Sprite also kleiner als 63 Bytes ist, füllen Sie alle leeren 
Bytes mit "0" auf. 


Laden Sie nun das Sprite vom Band und lassen Sie es in einem Pro- 
gramm ablaufen. Speichern Sie in jedem Fall das folgende Programm 
ab, mit dem Sie jedes Sprite vom Band lesen und dann ablaufen 
lassen können, denn dies spart eine Menge Zeit. Sie laden nur 
das Programm, bringen das Band an den Beginn des Sprites und las- 
sen das Programm dann ablaufen. Sie können dies mit jedem ge- 
wünschten Sprite durchführen. 


10 PRINT CHRS (147) 

20 BG = 53248:TU = BG + 21:51 = 2:L 2040:SS = 832:SL = 13 
30 X1 = BG + 2:Yl = BG + 3 

40 REM *%*%* ENDE DES DEFINITIONSBLOCKS *%*% 
50 REM 

100 REM *%*%* DATEN VOM BAND EINLESEN *** 
110 OPEN1,1,0,"RAKETE":REM SPRITE EINLESEN 
120 DIM R(64) 

130 FOR I = 0 TO 62 

140 INPUT#1,R(I) 

150 NEXT I 

160 CLOSE1:REM ALLE DATEN EINGELESEN, DATEI SCHLIESSEN 
200 REM *%*%* SPRITE ERSTELLEN *%*%* 

210 FOR J = 0 TO 62 

220 POKE SS+J,R(J) 

230 NEXT J 

240 POKE TU,S1 

250 POKE L+1 ,SL 

260 POKE Y1,100 

270 FOR H = 0 TO 255 

280 POKE X1,H:NEXT H 

290 GOTO 270 


Ohne Zweifel sehen Sie hier unser Sprite-Programm von Kapitel 7. 
Sie bekommen Ihre Spritewerte jedoch nicht von den DATA-Zeilen, 
sondern vom Band. Beachten Sie, daß wir nicht die Variable ST zur 
Überprüfung benutzen, ob alle Werte eingelesen wurden. Stattdes- 
sen schließen wir die Datei, sobald alle 63 Spritewerte geladen 
sind. Dies schließt die Gefahr aus, daß sich "fremde" Daten vom 
Band einschleichen. Wir sollten auch die Möglichkeit auf diese 
Weise mehrere Sprites zu laden, nicht außer acht lassen. Sie kön- 
nen dazu entweder mehrere Sprites aus der gleichen Datei, oder, 
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was besser ist, aus verschiedenen Dateien einlesen. Denken Sie 
dabei nur einfach an die Methoden zur Erzeugung und Behandlung 
von Sprites, die wir in Kapitel 7 diskutiert haben, mit dem klei- 
nen Unterschied, daß wir die Daten vom Band und nicht aus den 
DATA-Zeilen lesen. 


8.3 Sequentielle Daten auf Diskette 


Wenn Sie kein Diskettenlaufwerk haben, können Sie diesen Ab- 
schnitt überspringen und zum nächsten Kapitel übergehen. Andern- 
falls ist das folgende von großem Interesse. In gewisser Hinsicht 
ist das Speichern von Daten auf Diskette ähnlich wie das Spei- 
chern auf Band; allerdings geht der Speicher- und Ladeprozeß sehr 
viel schneller vonstatten. Natürlich können alle unsere Beispiele 
aus dem vorangegangenen Abschnitt ebenso mit dem Diskettensystem 
durchgeführt werden. Es sind nur winzige Änderungen des Formats 
notwendig. Zu Beginn sehen wir uns an, wie wir mit kleinen Ände- 
rungen des Formats Daten auf Diskette speichern können. Wir 
werden dabei das OPEN-, CLOSE-, INPUT#-, PRINT#- und GET#-Komman- 
dos vorstellen. 


OPEN. Um einen Diskettenkanal zu Öffnen, geben wir das Gerät mit 
der Ziffer "8", anstatt "1" (beim Band), an. Nachdem die Diskette 
mit der Filenummer "15" initialisiert wurde, öffnen wir eine wei- 
tere Datei mit der Nummer "9". Dazu geben wir ein: 


OPEN 9,8, etc. 
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Anstatt die Codenummern 0, 1 und 2 zum Schreiben oder Lesen und 
Schreiben der End-Of-Tape-Marke zu benutzen, verwenden wir READ 
(lesen) und WRITE (schreiben), oder kurz, R und W. Wir stellen 
dies jedoch unterschiedlich dar. Wir eröffnen eine Datei, indem 
wir zuerst die Dateinummer und die Gerätenummer eingeben, und 
dann erst eine zweite Adresse und die restlichen Filehandling- 
Kommandos in Anführungszeichen. Die zweite Adresse sollte nicht 
15 sein, da diese bei der Fehlerbehandlung benutzt wird. Nehmen 
Sie auch nicht die Zahlen 0 und 1, da diese zum Speichern und 
Laden von Programmen durch das Filehandlingsystem gebraucht wer- 
den. Die Nummern der zweiten Adresse können zwischen 2 und 14 
liegen. Wir benutzen hier die "9". 


OPEN 9,8,9, ETC. 


Wir beginnen die Angaben in Anführungszeichen mit der Laufwerk- 
nummmer "0" bei einem Laufwerk, gefolgt von einem Doppelpunkt und 
dem Dateinamen. 


OPEN 9,8,9,"0:TELEFONLISTE, etc." 


Als nächstes geben wir den Dateityp an. Im Moment benutzen wir 
sequentielle (fortlaufende) Dateien, angedeutet durch SEQ. Zu- 
letzt geben wir READ oder WRITE an, je nachdem, ob wir Informa- 
tionen auf Diskette speichern (WRITE) oder diese vom Band einle- 
sen (READ) möchten. Die gesamte Routine zum Eröffnen von Dateien 
sieht nun so aus: 


OPEN 9,8,9,"0:TELEFONLISTE,SEQ,WRITE" 


Glücklicherweise benutzen die INPUT#-, PRINT#- und GET#-Kommandos 
das gleiche Format wie beim Band. Die Zahl, die dem Kommando 
folgt, ist die zweite Adresse. Wenn wir also in unserem Beispiel 
mit PRINT# ausgeben möchten, schreiben wir 


PRINT#9, 
da "9" unsere zweite Adresse ist. (Beachten Sie, daß die erste 
Adresse ebenfalls die "9" ist. Durch Benutzen der gleichen Zahl 
für die erste und zweite Adresse verringern wir die Gefahr der 
Verwechslung. ) 
Um zu sehen, wie all dies funktioniert, führen wir unser Telefon- 


programm, das wir als Bandbeispiel erstellt haben, nochmals auf. 
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Der Dateneingabeblock ist identisch. Wir bearbeiten also nur den 
Block, der die Daten auf Diskette ausgibt. 


100 REM *** SICHERN VON DATEN AUF DISKETTE *** 
110 OPEN 9,8,9,"0:TELEFONLISTE,SEQ,WRITE" 

120 FOR I = 1 TO N% 

130 PRINT#9,NA(I) 

140 PRINT#9,PH(I) 

150 NEXT I 

160 CLOSE9I 


Wie Sie sehen, liegt der Hauptunterschied zwischen Band und Dis- 
kette am Format in Zeile 110. Das Format zum Ausgeben von Daten 
ist bei Band und Diskette identisch. Das gleiche gilt fast unein- 
geschränkt auch für den Abruf der Daten. Beachten Sie, daß Sie 
die Variable ST auch bei Disketten I/O (Ein- und Ausgabe) verwen- 
den können. 


10 PRINT CHRS (147) 

20 OPEN 9,8,9,"0:TELEFONLISTE,SEQ,READ" 
30 INPUT#9,DAS 

40 PRINT DAS 

50 IF STO = THEN GOTO 30 

60 CLOSE9I 


Um Zeit zu sparen, können Sie auch "S" für "SEQ" und "R" für 
"READ" schreiben. Mit diesen Abkürzungen sieht Zeile 20 folgen- 
dermaßen aus: 


20 OPEN 9,8,9,"0:TELEFONLSTE,S,R" 


Genauso können wir dies auch mit den anderen Dateistatusworten 
durchführen. Sie können diese Abkürzungen jedoch nicht für Datei- 
namen verwenden. 


Bevor wir uns noch mehr Methoden zur Benutzung des Diskettensys- 
tems ansehen, möchte ich Ihnen noch die Technik zum Ändern von 
Dateien zeigen. Wie Sie sich erinnern, mußten Sie beim Band erst 
alle Daten der alten Datei einlesen, neue Daten hinzufügen, das 
Band zurückspulen und somit die alte Datei mit der neuen über- 
schreiben. Die Diskette arbeitet auf die gleiche Weise. Aber an- 
statt sie zurückzusetzen, benutzen wir beim Ändern von Daten ein 
spezielles Format des OPEN-Befehls. Der folgende Block zeigt 
Ihnen die Vorgehensweise. 
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200 REM ***SCHREIBEN VON ALTEN UND NEUEN DATEN AUF DISKETTE 
210 NP = N + NN:REM KOMBINIERTE SUMME ALLER NAMEN 

220 OPEN 9,8,9,"S0:TELEFONLISTE,S,W" 

230 FOR I = 0 TO NP 

240 PRINT#9,NAS(I) 

250 PRINT#9,PH(I) 

260 NEXT I 

270 CLOSE9I 


Der Schlüssel zum Überschreiben einer Datei ist das Symbol "S". 
Wir benutzen dieses Format auch, um bestehende Dateien zu über- 
schreiben. 


Da wir inzwischen eine Anzahl individueller Programme erstellt 
haben, schreiben wir jetzt ein Programm, das 1) Dateien erstellt, 
2) eine einzelne Datei liest und diese 3) an eine bestehende Da- 
tei anfügt. Anstelle von Namen und Telephonnummern nehmen wir 
jetzt Namen und Adressen. 


10 PRINT CHR$(147) :RESTORE:CLR 

20 PRINT "**x";CHRS (18) ; "DATEIVERWALTUNG" ;CHRS (146) ; "xxx" 
30 PRINT:FOR I = 1 TO 5:PRINT I"-":PRINT:NEXT 

40 PRINT CHR$(19) :PRINT:PRINT:FOR I = 1 TO 5:READ D$:PRINT 
SPC(5);D$:PRINT:NEXT 

50 DATA NEUE DATEI ERSTELLEN, SÄTZE HINZUFÜGEN, ALLE DATEIEN 
LESEN, EINE DATEI LESEN 

60 DATA EXIT 

70 PRINT:PRINT CHR$ (18) ; "KENNZIFFER FÜR VERARBEITUNG" ; CHR$ 
(146) 

80 GET A:IF A < 1 THEN 80 

90 ON A GOTO 100,200,400,500,700 

100 REM **%* DATEI ERSTELLEN *** 

110 PRINT CHR$S (147) :PRINT:PRINT 

120 INPUT "WIE VIELE NAMEN" ;N% 

130 OPEN9,8,9"0:ADRESSEN ‚,S ,W" 

140 PRINT#9,N%:REM ANZAHL ADRESSEN WIRD IN DATEI GESCHRIEBEN 
150 DIM NAS (N%) ,ST$S(N%) ‚„PLS (N%) ‚WOS (N%) 

160 FOR I = 1 TO N%:GOSUB 1000:G0OSUB 2000:NEXT 

170 CLOSE9I 

180 GOTO 10 

200 REM *** SÄTZE HINZUFÜGEN *** 

210 PRINT CHR$ (147) :PRINT:PRINT 

220 INPUT "ANZAHL ANZUFÜGENDER SÄTZE" ;NN% 

230 OPEN9,8,9,"0:ADRESSEN,S,R" 
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240 INPUT#9,N%:REM ANZAHL EXISTIERENDER SÄTZE ERMITTELN 
250 NP% = N% + NN% 

260 DIM NAS(PN%) ,‚ST$S (NP%) ‚,PLS (NP%) ‚WO$ (NP%) 
270 FOR I = 1 TO N%.GOSUB 3000:NEXT 

280 CLOSE9I 

300 PRINT#9,NP% 

310 FOR I = (N%+1) TO NP%:GOSUB 3000 ::NEXT 
330 CLOSE9I 

320 FOR I=1 TO NP%:GOSUB 2000:NEXT 

330 CLOSE9I 

340 GOTO 10 

400 REM *** UNTERPROGRAMM LESEN *** 

410 OPEN9,8,9,"ADRESSEN,S,R" 

420 INPUT#9,N% 

430 DIM NAS(N%) ,ST$S(N%) ,PLS(N%),WOS (N%) 
440 FOR I = 1 TO N%:GOSUB 3000 :NEXT 

450 CLOSE9I 

460 FOR I = 1 TO N%:GOSUB 4000:NEXT 

470 PRINT:PRINT "WEITER MIT BELIEBIGER EINGABE" 
480 GET AS:IF AS = "" THEN 480 

490 GOTO 10 

500 REM *** SUCHROUTINE *%*% 

510 PRINT CHR$(147) 

520 INPUT "WELCHEN NAMEN SUCHEN"; NAS 

530 OPEN9,8,9, "ADRESSEN ,S,R" 

540 INPUT#9 ,N% 

550 DIM NAS (N%) ,ST$S(N%) ,„PLS (N%) ‚WO$ (N%) 
560 FOR I = 1 TO N%:GOSUB 3000 

570 IF NAS(I) = NA$S THEN GOSUB 4000 

580 NEXT 

590 CLOSE9I 

600 PRINT:PRINT:PRINT:PRINT "WEITER MIT BELIEBIGER EINGABE" 
610 GET ANS:IF ANS = "" THEN 610 

620 GOTO 10 

700 REM *** ENDE *%#* 

710 END 

1000 REM *%*%* UNTERPROGRAMM EINGABE *%*% 
1010 PRINT "NAME #";I 

1020 INPUT INPUT NAS(I) 

1030 INPUT "STRASSE" ;ST$S (I) 

1040 INPUT "PLZ";PLS(I) 

1050 INPUT "ORT" ;WO$S (I) 

1060 RETURN 

2000 REM *%*%* UNTERPROGRAMM PRINT# *** 
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2010 PRINT#9,NAS (I) 

2020 PRINT#9,ST$S(I) 

2030 PRINT#9,PLS(I) 

2040 PRINT#9,WOS (I) 

2050 RETURN 

3000 REM *%*%* UNTERPROGRAMM INPUT# *%*% 
3010 INPUT#9,NAS (I) 

3020 INPUT#9,ST$(I) 

3030 INPUT#9,PLS(I) 

3040 INPUT#9,WOS (I) 

3050 RETURN 

4000 REM *%*%* UNTERPROGRAMM DRUCK *#x*%k 
4010 PRINT NAS(I) 

4020 PRINT S4$(I) 

4030 PRINT 

4040 PRINT PLS(I)+" "+WOS(I) 

4050 PRINT:PRINT 

4060 RETURN 


Das war ein langes Programm. Wenn Sie Programme von dieser Länge 
erstellen, ist es besser, wenn Sie Ihr Programm nach jeweils 10 - 
15 Zeilen abspeichern. Sie können so das Programm wieder holen, 
wenn etwas schief ging. Es ist wichtig, verschiedene Aspekte des 
Programms zu beachten, so wie z.B. das neue Kommando CLR. Das 
CLR-Kommando löscht alle Variablen und Tabellen. Es ist für jene 
Programme, mit denen Sie verschiedenes ausführen möchten, während 
sich das Programm noch im Speicher befindet. Sie wollen z.B. Da- 
ten an Ihre Adressenliste anfügen und anschließend einen einzel- 
nen Namen lokalisieren. Durch Löschen der Variablen und Tabellen 
verhindern Sie, daß Sie falsche Werte erhalten, wenn Sie zum Menü 
zurückkommen. 


Ein weiterer wichtiger Punkt, den Sie beachten sollten, ist die 
Verwendung von Unterroutinen. Diese machen nicht nur das Programm 
besser lesbar; Sie sparen sich durch Unterroutinen auch Program- 
mierzeit. Zum Beispiel wird sowohl in der "READ"-, als auch in 
der "SUCH"-Routine die "INPUT#"-Unterroutine verwendet. Anstatt 
diese Programmzeilen mehrfach einzugeben, springt das Programm 
zur Unterroutine. Im nächsten Kapitel stelle ich noch eine Unter- 
routine vor, die zum Ausgeben aller Namen und Adressen auf den 
Drucker dient. So schreiben Sie nicht das gesamte Programm neu, 
sondern fügen nur die notwendige Unterroutine hinzu. 
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8.4 Zusammenfassung 


In diesem Kapitel haben Sie gelernt, durch Abspeichern von Da- 
teien auf Band oder Diskette Zeit zu sparen. Sie können auf Band 
Daten abspeichern, die Sie später mit einem Programm verarbeiten. 
Dies ist sehr nützlich, da es Ihnen ermöglicht, heute Daten ein- 
zugeben, die Sie erst später verarbeiten, ohne sie erneut ein- 
geben zu müssen. Das kann natürlich mit einem einzigen Programm, 
wenn Sie dabei PRINT- und DATA-Zeilen verwenden, ebenso gemacht 
werden. Der Benutzer ist jedoch an das Programm gebunden, das die 
betreffenden DATA-Zeilen enthält. Nach dem Abspeichern auf Band 
oder Diskette können Sie die Daten von verschiedenen Programmen 
aus verarbeiten. Das ist bei Sprites von besonderem Nutzen. 


Wenn Sie ein Diskettensystem benutzen, ist es möglich, Daten, wie 
auf dem Band, in sequentieller Folge abzuspeichern. Die Diskette 
erlaubt jedoch einen viel schnelleren Zugriff auf die Daten und 
es ist möglich, mit Datendateien auf Diskette, verschiedene Dinge 
mit einem einzigen Programm durchzuführen. Das "File Master"- 
Programm zeigt, wie ein einziges Programm dazu benutzt wird, um 
einzelne oder mehrere Dateien zu erstellen, sie zu lesen oder 
Daten zu ergänzen. Es muß zwar alles mit großer Vorsicht durchge- 
führt werden, Sie vergrößern aber auch die Leistungsfähigkeit 
Ihres Computers, wenn Sie mit sequentiellen Dateien arbeiten. 
Die praktische Anwendung dieser Programme ist von großer Bedeu- 
tung. 
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Einführung 


Sie sollten inzwischen so geübt sein, daß Sie Informationen auf 
den Bildschirm, auf Diskette oder Band ausgeben können. Mit PRINT 
"HALLO" geben Sie auf den Bildschirm aus. Mit SAVE oder PRINT# 
erzeugen Sie eine Ausgabe auf Band oder Diskette. In der gleichen 
Weise, wie Sie mit Bildschirm, Band oder Diskette in Verbindung 
treten, können Sie den Drucker "ansprechen". Er stellt nur ein 
weiteres "Ausgabeziel" dar. Sie können jedoch nicht mit LOAD, 
INPUT oder ähnlichen Befehlen vom Drucker Daten einlesen. 


Um Informationen auf den Drucker auszugeben und die speziellen 
Möglichkeiten des Druckers zu nutzen, müssen Sie bestimmte Proze- 
duren lernen, die wir bis jetzt noch nicht besprochen haben. 
während Ihnen einiges aus diesem Kapitel bereits bekannt ist, zum 
Beispiel was die Kommandos betrifft, stellt doch die Anordnung 
dieser Kommandos etwas Neues dar. Wir sehen uns auch an, wie wir 
den Drucker für Aufgaben verwenden können, die mit dem Bildschirm 
nur schlecht durchzuführen sind. Lange Programmlistings können 
Sie z.B. besser auf dem Drucker ausgeben, da sie am Bildschirm 
über den oberen Rand "ins Nichts" verschwinden. Wie in Kapitel 8 
erstellen wir ein kleines Programm zur Speicherung von Telefon- 
nummern und ein weiteres zur Speicherung von Adressen. Mit Hilfe 
eines Druckers können Sie die Telefonliste ausgeben oder Adres- 
senaufkleber drucken. 


Es gibt sehr viele Drucker auf dem Computermarkt. Um es so ein- 
fach wie möglich zu machen, nehmen wir für unsere Beispiele den 
VIC-1515-Drucker von Commodore. Dieser Drucker liefert alle Gra- 
fik- und Textmöglichkeiten, die Sie brauchen, und ist sehr ein- 
fach mit dem COMMODORE-64-System zu verbinden. Verglichen mit 
anderen, ist er auch sehr preisgünstig. Haben Sie einen anderen 
Drucker mit dem passenden Interface für Ihren COMMODORE-64, müs- 
sen Sie sich gut mit dem Druckerhandbuch vertraut machen. Leider 
sind manche Druckerhandbücher für Anfänger schwer zu lesen, da 
sie oft sehr technisch geschrieben sind. Achten Sie deshalb sehr 
genau auf die Codes, welche die speziellen Möglichkeiten Ihres 
Druckers ein- oder ausschalten. Dies wird gewöhnlich mit dem 
CHRS-Kommando von BASIC gemacht. Es ist also das wichtigste, daß 
Sie den Anweisungen dieses Buches folgen und gleichzeitig die 
geeigneten Codes Ihres Druckerhandbuches verwenden. 
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Bevor Sie einen Drucher kaufen 


Der wichtigste Aspekt beim Kauf eines Druckers ist das pas- 
sende Interface für Ihren COMMODORE-64. Sehr oft erzählen 
enthusiastische Verkäufer dem Anwender alle Qualitäten ei- 
nes Druckers und nehmen einfach an, daß er mit jedem Com- 
puter zusammen funktioniert. Das ist jedoch nicht der Falll 
Damit ein Drucker mit einem Computer arbeitet, braucht er 
das passende Interface. Vergewissern Sie sich deshalb vor 
dem Kauf eines Druckers, der nicht, wie z.B. der VIC-1515, 
speziell für den COMMODORE-64 hergestellt wurde, ob Sie 
auch das geeignete Interface dafür bekommen. Der sicherste 
Weg zu erfahren, ob der Drucker mit einem COMMODORE-64 zu- 
sammen arbeitet, ist eine Testdemo. Die VIC-1515 und VIC- 
1525 Drucker arbeiten problemlos mit dem COMMODORE-64. 
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9.1 Die Ausgabe von Text auf dem Drucker 


Das erste, was Sie mit Ihrem Drucker machen werden, ist die Aus- 
gabe von Text als "Hardcopy" ("Hardcopy" ist ein sehr eindrucks- 
voller Ausdruck der Computersprache: er heißt nichts anderes als 
die Druckausgabe auf Papier. Benutzen Sie ihn, um Ihre Freunde zu 
verblüffen!). Wie beim Kassettenrecorder oder der Diskettensta- 
tion ist es notwendig, vor der Informationsausgabe einige Schrit- 
te durchzuführen. Lassen Sie uns diese wiederholen. 


OPEN - zuerst schaffen Sie damit eine Verbindung zu Ihrem 
Drucker. Beim VIC-1515 befindet sich auf der Rückseite 
ein Schalter mit der Gerätenummer 4 oder 5. Wir be- 
nutzen in unseren Beispielen die "4". Sehen Sie also 
nach, ob sich der Schalter in Position "4" befindet. 
(Erinnern Sie sich, daß die Gerätenummer Ihrer Disket- 
teneinheit "8" ist.) Die Reihenfolge für das OPEN beim 
Drucker ist folgende: Sie geben zuerst eine Nummer 
zwischen 1 und 255 an (wir benutzen die Glückszahl 7) 
und anschließend die Gerätenummer 4. Hier ein Beispiel: 


OPEN7,4 


Jetzt ist Ihr Drucker bereit, Instruktionen für die logische Da- 
teinummer "7" zu empfangen. 


CMD _ Das CMD-Kommando weist Ihren Computer an, Daten an 
Ihren Drucker zu senden. Sie verwenden dazu die Datei- 
nummer (in unserem Beispiel die 7) und nicht die Gerä- 
tenummer (4). Sie geben z.B. folgendes ein: 


CMD7 


Ihr Drucker wird "angekurbelt" und druckt READY aus, wie Sie es 
vom Bildschirm gewohnt sind. Geben Sie folgendes ein: 


FOR I = 1 TO 10:PRINT:NEXT 
Das Papier im Drucker wird 10 Zeilen vorgeschoben; bisher löste 
dieser Befehl einen Zeilenvorschub auf dem Bildschirm aus. Die 


Ausgabe erscheint jetzt so lange auf dem Drucker, anstatt auf dem 
Bildschirm, bis Sie diese Verbindung wieder unterbrechen. 
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Es gibt zwischen der Ausgabe auf dem Drucker und dem Bildschirm 
einen wichtigen Unterschied. Wenn Sie 


FOR I = 1 TO 80:PRINT "X"; :NEXT 


eingeben, erscheinen alle 80 "X" in einer Zeile. Bei Benutzung 
des gleichen Kommandos am Bildschirm, würde es in zwei Zeilen 
erscheinen, weil Ihr Drucker 80 Spalten, statt der 40 Spalten des 
Bildschirms ausgibt. 


PRINT# - Sie erinnern sich, daß wir PRINT# im Programm dazu ver- 
wenden, Informationen auf Band oder Diskette auszuge- 
ben. Nun, der Drucker wendet das gleiche Prinzip an. 
Nehmen wir den Fall an, Sie möchten nur wenig Daten 
im Programm ausgeben, und nicht alle davon auf dem 
Drucker. Da Sie aber das CMD-Kommando eingegeben haben, 
geht alles, was Sie normal auf dem Bildschirm sehen, 
auf den Drucker. 


Benutzen Sie jedoch PRINT#, wird nur diese Information 
zum Drucker geschickt. Angenommen, Sie möchten, daß Sie 
am Bildschirm mit "Name?" aufgefordert werden, und daß 


dieser nach Eingabe sofort am Drucker ausgegeben wird, 
dann benutzen Sie PRINT#. Das Format ist 


PRINT#7,NAS 
oder 

PRINT#7 ,"CHARLIE BROWN" 
oder 

PRINT#7,12345 
Lassen Sie uns ein kleines Programm ausprobieren, das Namen auf 
dem Drucker ausgibt. Das Programm spricht sowohl den Drucker als 
auch den Bildschirm an. 

10 PRINT CHR$(147) 


20 PRINT:PRINT:PRINT "DRUCKER EINSCHALTEN" 
30 PRINT:PRINT:PRINT "WEITER MIT BELIEBIGER EINGABE" 
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40 GET A$S:IF A$ = "" THEN 40 

50 PRINT CHR$(147) 

60 OPEN7,4 

70 INPUT "ZU DRUCKENDER NAME" ;NA$ 
80 PRINT#7 ,NAS 

90 INPUT "WEITERE NAMEN (Y/N)";ANS$ 
100 IF ANS = "Y" THEN 70 

110 CLOSE7 

120 END 


CLOSE - Das letzte Kommando, mit dem Sie Ihren Drucker anspre- 
chen, ist CLOSE. Wie wir im Programm oben sehen, 
schließt das Kommando den Kanal zum Drucker und schal- 
tet ihn ab. Größtenteils arbeitet das CLOSE hier genau 
so wie bei der Diskette oder beim Band; es kommt jedoch 
noch etwas hinzu. Bevor Sie den Kanal zum Drucker 
schließen, müssen Sie erst PRINT#<fn> eingeben. Wenn 
Sie deshalb mit OPEN einen Kanal zum Drucker öffnen und 
das CMD-Kommando benutzen, müssen Sie vor dem CLOSE- 
Kommando zuerst PRINT# angeben. 


Zum Beispiel: 


OPEN?7,4 

CMD 7 

PRINT "HALLO HALLO" 
PRINT#7 

CLOSE7 


Wenn Sie das CLOSE-Kommando nicht in Verbindung mit dem PRINT# 
Kommando aussenden, treten Probleme auf. 


Auflisten von Programmen 


Da das Auflisten von Programmen über den Drucker sehr geeignet 
für die Dokumentation und die Fehlersuche ist, wäre es gut ein 
Hilfsprogramm dafür zu haben. Daher schreiben wir jetzt ein 
Programm, das Ihr Programm auf den Drucker ausgibt. Wir werden es 
kurz halten, so daß wir es zu Beginn jedes Programms anhängen 
können. Zuerst laden Sie ein Programm in den Speicher und fügen 
Sie folgende Zeilen hinzu: 
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1 OPEN7,4 
2 CMD7 

3 LIST 5- 
4 END 


Wenn Sie RUN eingeben, schaltet der Drucker auf "bereit" und 
listet das Programm von Zeilennummer 5 bis ans Ende auf. Wenn Sie 
fertig sind, geben Sie noch PRINT#7 und CLOSE7 ein, um die Datei 
und den Kanal zu schließen. Leider können Sie das CMD-Kommando 
vom Programm aus nicht umschalten, indem Sie PRINT# und CLOSE 
angeben, so wie dies bei Verwendung des PRINT#-Kommandos möglich 
war. Vergewissern Sie sich also, daß Sie den Drucker nach dem 
Listing ausgeschaltet haben, um ihn aus dem Kommandomodus zurück- 
zuholen. 


9.2 CHR$S-Funktionen 


Das Geheimnis bei der Benutzung von Druckern liegt im Verständnis 
der Control-Codes. Sie müssen wissen, was sie bedeuten und wie 
man sie anwendet. Folgende Aufstellung zeigt zum Beispiel eine 
Teilliste von Codes, mit denen ein CENTRONICS 737 arbeitet: 


MNEMONIC DEZIMAL OKTAL HEX FUNKTION 

ESC,SO 27,14 033,016 1B,0E Breitschrift 
ESC,DC4 27,20 033,034 1B,13 16.7 Zeichen/inch 
ESC ,DC1 21517 033,021 1B,11 Proportionalschrift 


Für Anfänger in der "Welt der Computer" könnte das von einem Be- 
sucher eines fremden Planeten erstellt sein. Es stecken jedoch 
wichtige Informationen in diesen Codes, und wenn Sie erst einmal 
wissen, wie Sie diese einsetzen können, ist es relativ einfach. 


Beachten Sie zu Beginn nur die Spalten DEZIMAL und FUNKTION. In 
der ersten Spalte haben wir den dezimalen Code 27 und 14, um die 
Breitschrift einzuschalten. Um dem Drucker mitzuteilen, daß Sie 
die Breitschrift wünschen, benutzen Sie CHR$(27) + CHR$S(14). Um 
dies Ihrem Drucker mitzuteilen, müssen Sie folgendes machen: 
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1. OPEN?7,4 
2: PRINT#7,CHRS(27) + CHRS$S(14) + "NACHRICHT" 


Wenn Sie einen Centronics 737 oder 739 haben, würde dieser jetzt 
den String "NACHRICHT" in Breitschrift ausgeben. Ebenso müßten 
Sie bei der verdichteten Druckausgabe (16.7 cpi = characters per 
inch) .:CHR$S(27) + CHR$S(20) und bei der Proportionalschrift 
CHRS(27) + CHRS(17) verwenden. Wenn Sie den Dezimalcode haben, 
geben Sie diesen nur dem Drucker mit und Sie erreichen alle Aus- 
gabeformen, von der Umstellung des Schriftbildes bis zum Aufruf 
der "Rückschritt-Funktion". 


Bei anderen Druckern ist es das gleiche. Lassen Sie uns zum VIC- 
1515-Drucker zurückkehren. Wie wir sehen, benutzt der VIC-1515 
oder VIC-1525, genau wie der Centronics-Drucker (oder jeder ande- 
re), CHR$S Kommandos, um die verschiedenen Möglichkeiten des 
Druckers auszunutzen. 


Lassen Sie uns die verschiedenen CHR$S-Kommandos in Verbindung mit 
dem VIC-1515 ansehen: 
CHR$S FUNKTION 


10 & 13 Zeilenvorschub 


8 Grafikmodus 

14 doppelte Breite 

15 zurücksetzen auf Standardschriftdichte 

16 Startadresse für den Druckbeginn 

27 Escape (wird in Verbindung mit anderen Codes 

benutzt) 

145 Cursor up 

17 Cursor down 

18 Umkehr der Druckrichtung 
146 zurück in die normale Druckrichtung 
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| : Wie man 
Breit- 
schrift 






Um Ihnen zu zeigen, wie die CHR$-Funktionen arbeiten, schreiben 
wir ein einfaches Programm, welches Ihren Namen auf dem Drucker 
ausgibt. Da Sie bereits wissen, wie Sie normalen Text ausgeben, 
beginnen Sie mit der verbreiterten Textausgabe. Ein Blick in die 
Tabelle sagt uns, daß wir dies mit CHR$S(14) erreichen. Also wer- 
den wir es in unser Programm einbauen. (Beachten Sie das Fehlen 
der Interpunktionszeichen nach dem Komma, das dem PRINT#7 folgt.) 


10 PRINT CHR$S(147) 

20 OPEN7,4:REM KANAL 7 FÜR EXTERNE EINHEIT NR. 4 (DRUCKER) 
30 INPUT "IHR NAME ";NAS 

40 PRINT#7,CHR$S(14) NAS$S:REM BREITSCHRIFT 

50 PRINT#7,CHRS(15) :REM ZURÜCK ZU NORMALSCHRIFT 

60 CLOSE7 


Geben Sie RUN ein. Drucken Sie einige Namen aus und beachten Sie 
dabei die Breitschrift. 


Bis jetzt haben wir noch nicht viel mit Groß- und Kleinbuchstaben 
gearbeitet. Wenn Sie aber Text auf dem Drucker ausgeben, brauchen 
Sie oft die Groß-/Kleinschreibung. So möchten Sie z.B. Namen 
nicht als 
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DOKTOR MICHAEL SCHMITT, 
sondern als 


Doktor Michael Schmitt 
ausgeben. Wir brauchen dazu ein spezielles CHRS$S-Kommando. Beim 
VIC-1515-Drucker ermöglicht der CURSOR DOWN-Modus, CHR$(17), die 
Darstellung von Klein- und Großbuchstaben. Um dies zu erreichen, 
ändern Sie Zeile 40 und 50 unseres Programms folgendermaßen: 


40 PRINT#7,CHRS(17) NAS:REM KLEIN/GROSSCHREIBUNG 
50 PRINT#7,CHR$(145) :REM ZURÜCK ZU GROSSBUCHSTABEN 


Drücken Sie jetzt gleichzeitig die Commodore-Taste und die SHIFT- 
TASTE, um Ihren Computer in den Groß-/Kleinbuchstabenmodus zu 
bringen, und geben Sie RUN ein. Wenn Sie jetzt die Großbuchstaben 
mit Hilfe der SHIFT-Taste eingeben, werden auf dem Drucker sowohl 
Kleinbuchstaben als auch Großbuchstaben ausgegeben. 


Hätten Sie das vor der Programmänderung probiert, würden Sie bei 
Verwendung der SHIFT-Taste statt Großbuchstaben Grafikzeichen in 
der Druckausgabe sehen, auch wenn Sie den Computer bereits in den 
Groß-/Kleinbuchstabenmodus gebracht hätten. Probieren Sie es mit 
dem Originalprogramm aus, um es selbst zu sehen. 


Ein weiterer Trick ist die Verwendung der Groß- und Kleinbuchsta- 
ben, zusammen mit der Breitschrift. Sie müssen das Programm so 
ändern, daß es beide CHR$S-Kommandos enthält. Ändern Sie also 
erneut Zeile 40 und 50 in folgende: 


40 PRINT#7,CHRS(17) CHRS(14) NAS 
50 PRINT#7,CHRS (145) CHR$S(15) :REM GROSSBUCHSTABEN + NORMAL 


Wenn Sie dieses Programm ablaufen lassen, sehen Sie, daß es mög- 
lich ist, mehrere Abweichungen vom Standard gleichzeitig durch- 
führen können. An manchen Druckern, wie z.B. beim EPSON MX-80FT 
mit GRAFTRAX PLUS, ist es möglich, nicht nur die Breitschrift, 
sondern auch Schrägschrift, Schmalschrift, Doppelanschlag, Schat- 
tenschrift, Hoch- und Tiefstellung und jede Verknüpfung all die- 
ser Funktionen untereinander zu wählen. Mit CHRS können all die 
verschiedenen Schriftarten einzeln oder in jeder gewünschten Kom- 
bination verwendet werden. 
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Da wir nun die verschiedenen Wege zur Handhabung der Schriftarten 
kennen, lassen Sie sie uns praktisch anwenden. Wir schreiben ein 
Adressen-Druckprogramm für den VIC-1515/1525-Drucker. Manche Her- 
steller von Aufklebern stellen gummierte Aufkleber auf Lochrand 
her, so daß Sie diese wie normale Endlosformulare in den Drucker 
einspannen können. Unser Programm druckt die Namen mit Groß- und 
Kleinbuchstaben in Breitschrift, die Straße in Standardschrift 
mit Klein- und Großbuchstaben, und die Postleitzahl und den Wohn- 
ort nur in Großbuchstaben. 


10 PRINT CHR$(147) :PRINT CHR$(14) :REM GROSS/KLEIN 
20 OPEN?7,4 

30 INPUT "NAME" ;NAS 

40 INPUT "STRASSE" ;STS 

50 PRINT CHRS(142) :REM GROSSBUCHSTABEN 
60 INPUT "PLZ" ;PLS 

70 INPUT "ORT" ;WOS 

100 PRINT#7,CHRS(17) CHRS(14) NAS 

110 PRINT#7,CHRS(15) CHR$S(17) ST$ 

120 PRINT#7,CHRS(145) PLS$S+" "+Wo$ 

130 CLOSE7 


Wenn Sie das Programm ablaufen lassen, sehen Sie, daß Sie auf dem 
Bildschirm den gleichen Modus wie bei der Druckausgabe haben. 
Dies weist den Benutzer darauf hin, wie die Druckausgabe er- 
scheint. Beachten Sie, daß für den Groß-/Kleinbuchstabenmodus auf 
dem Bildschirm unterschiedliche CHRS-Kommandos verwendet werden. 
So bringt z.B. CHR$(12) den Bildschirm in den Groß-/Kleinschreib- 
modus, während CHR$(17) den Drucker in diesen Modus bringt. 


Um die praktische Anwendung des Programms zu erhöhen, fügen wir 
noch einige Leerzeilen an das Ende des Drucks, so daß die Aus- 
richtung auf die Aufkleber genau übereinstimmt. Je nach der Größe 
Ihrer Aufkleber benötigen Sie weniger oder mehr Leerzeilen. Fügen 
Sie folgende Zeile an Ihr Programm und gleichen Sie die Schleife 
an, um die Ausgabe genau auf Ihre Aufkleber auszurichten. 


125 FOR I = 1 TO 3:PRINT#7:NEXT:REM ÄNDERN SIE "3" IN DIE 
KORREKTE ANZAHL VON LEERZEILEN FÜR IHRE AUFKLEBER 


In Kapitel 8 habe ich versprochen, eine Unterroutine für das 
"FILE MASTER"-Programm bereitzustellen, um die Namen und Adressen 
auf dem Drucker auszugeben. Nun, das ist genau das, was wir gera- 
de vorhaben. Um die Änderung durchzuführen, laden Sie Ihr "FILE 
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MASTER"-Programm in den Speicher und fügen Sie folgende Zeilen 
hinzu oder ändern Sie sie. Aber tippen Sie nicht alles nochmal 
ein! 


470 PRINT "MIT BELIEBIGER EINGABE ZURÜCK ZUM MENÜ" 
475 PRINT "MIT 'P' ZUM DRUCKZWEIG" 

485 IF AS = "P" THEN GOSUB 5000 

525 INPUT "BILDSCHIRM 'B' ODER DRUCKER 'D'";OPS 
570 IF NA$S(I) = NAS AND OP$ = "B" THEN GOSUB 4000 
575 IF NAS(I) = NAS AND OP$ = "D" THEN GOSUB 6000 
5000 REM *%*%* UNTERPROGRAMM DRUCKER *%** 

5010 OPEN7,4 

5020 CMD7 

5030 FOR I = 1 TO N%$.PRINT NAS(I):PRINT ST$(I) 
5040 PRINT PLZS+" "+WOS 

5050 NEXT 

5060 PRINT#7 

5070 CLOSE7 

5080 RETURN 

6000 *%*% DRUCKROUTINEN FÜR EINZELNE DATEI *** 
6020 OPEN 7,4 

6030 CMD7 

6040 PRINT NAS(I):PRINT STS$S(I):PRINT PLS(I)+" "+WOS(I) 
6050 PRINT#7 

6060 CLOSE7 

6070 RETURN 


Manchmal möchten Sie nicht, daß die Druckausgabe ganz am linken 
Rand des Papiers oder des Aufklebers beginnt. Um die Startposi- 
tion der Textausgabe festzulegen, benutzen Sie CHR$(16) und er- 
reichen damit einen freien linken Rand. Es gibt verschiedene 
Möglichkeiten, dies zu tun. Die einfachste Art ist die Angabe von 
CHR$(16), dahinter in Anführungszeichen die Startposition des 
Textes, dann folgt der auszugebende Text. Sie müssen dabei eine 
zweistellige Zahl verwenden. Wenn Sie also 5 Stellen vom linken 
Rand beginnen möchten, müssen Sie "05", nicht nur "5" angeben. 


Probieren Sie zum Beispiel folgendes: 
OPEN? ,4 


PRINT#7, CHR$(16) "O5SFÜHRT DIES BERECHNUNGEN DURCH?" 
CLOSE/ 
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Wie Sie beim Ausführen der Kommandos sehen, gibt Ihr Drucker nur 
"FÜHRT DIES BERECHNUNGEN DURCH?" aus, und nicht die "05", auch 
wenn sie mit in den Anführungszeichen aufgeführt ist. "05" stellt 
nur die Position des Textes ein. Fügen Sie eine weitere "5" ein, 
so daß die Zeile folgendermaßen aussieht: 


PRINT#7,CHR$S (16) "055FÜHRT DIES BERECHNUNGEN DURCH?" 


und Sie erhalten "5FÜHRT DIES BERECHNUNGEN DURCH?", da hinter der 
zweiten Nummer alle Angaben als Informationen interpretiert und 
somit ausgegeben werden. 


Sie können die Anzahl der Leerstellen aber auch CHR$S angeben, 
anstatt mit Zeichen in Anführungszeichen. Möchten Sie z.B. den 
gedruckten Text an unterschiedlichen Positionen, festgelegt durch 
eine Schleife, so ausgeben, daß die nächste Position abhängig von 
der letzten angesteuert wird, dann legen Sie dies durch CHR$S(I) 
fest, wobei "I" den jeweiligen Schleifenbeginn darstellt. Dies 
können Sie machen. Es ist jedoch etwas verzwickt, da CHRS$S den 
ASCII-Wert der Nummer beinhalten muß. Zum Beispiel sieht eine 
"05" so aus: 


CHRS (0) CHR$(53) 
Wenn Sie das Beispiel oben anwenden, so sieht das so aus: 


PRINT#7, CHR$(16) CHR$S(0) CHR$S(53) "FÜHRT DIES BERECHNUNGEN 
DURCH?" 


Sie müssen beim Berechnen der Position mit Hilfe einer Schleife 
beide Stellen der betreffenden Position als Distanz zum Schlei- 
fenzähler angeben. Für die meisten Anwendungen ist es daher sehr 
viel einfacher, die Positionsnummer zusammen mit dem auszugeben- 
den Text in Anführungszeichen zu schreiben. 


Bevor wir zur Ausgabe der Grafik übergehen, üben wir noch die An- 
wendung der Druckposition im Programm. Dies ist sehr hilfreich 
für Listen, in denen eine Aufteilung in Spalten erforderlich ist. 
Wir zeigen dies am Beispiel einer Verkaufsliste. In der ersten 
Spalte steht die Artikelbezeichnung, die zweite Spalte enthält 
den Einkaufspreis und die dritte Spalte den tatsächlich erzielten 
Verkaufspreis. Wir benutzen INPUT-Anweisungen, so daß alle Anga- 
ben über die Tastatur eingegeben werden können und das Programm 
bei einem wirklichen Verkauf gestartet wird. 
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10 PRINT CHR$(147) 

20 PRINT:PRINT:INPUT "WIE VIELE ARTIKEL" ;N% 

25 DIM ARS(N%) ,AP(N%),SP(N%) 

30 PRINT:FOR I = 1 TO N% 

40 PRINT "ARTIKEL #";:INPUT AR$S(I) 

50 INPUT "EINKAUFSPREIS";AP(I) 

60 INPUT "VERKAUFSPREIS" ;SP(I) 

70 PRINT 

80 NEXT 

100 REM *%*%* DRUCKFORMATIERUNG **%k 

110 OPEN7,4 

120 PRINT#7 ‚"ARTIKEL" ;CHRS$S (16) "15EINKAUFSPREIS"; 
130 PRINT#7,CHRS(16) "35VERKAUFSPREIS" 

140 PRINT#7,CHR$S(10):REM ZEILENVORSCHUB 

150 FOR P= 1 TO N% 

160 PRINT#7,ARS(P) 

170 PRINT#7,CHRS(16) CHRS(49) CHR$S(53) "$";AP(P) 
180 PRINT#7,CHR$S(16) CHRS(51) CHRS(53) "$";SP(P) 
190 NEXT 

200 CLOSE7 


Zwei Dinge müssen in diesem Programm beachtet werden. Sehen Sie 
sich zuerst die Angabe des CHR$-Codes, zur Festlegung der Druck- 
ausgabe in Zeile 170 und 180 an. Die Kombination dieser Codes ist 
identisch mit der Angabe "15" und "35" in Zeile 120 und 130. 
Zweitens benutzen wir CHRS(10) zum Zeilenvorschub. Wir könnten 
hier genausogut nur PRINT#7 angeben, um das gleiche Ergebnis zu 
erhalten. Sie kommen aber vielleicht einmal in eine Situation, wo 
Sie in der Mitte der Zeile einen Zeilenvorschub brauchen und dann 
ist CHR$S(10) gut einzusetzen. Um ein wirklich schönes Programm 
daraus zu machen, errechnen Sie die Summe der Einkaufspreise so- 
wie die Summe der erzielten Verkaufspreise aller Artikel. Ebenso 
wäre es eine interessante Erweiterung, eine vierte Spalte anzu- 
legen, welche die Differenz zwischen dem Einkaufspreis und dem 
erzielten Verkaufspreis, also den Bruttogewinn enthält. Sie soll- 
ten in der Lage sein, dies allein durchzuführen! (Hinweis: Bauen 
Sie eine weitere Tabelle auf.) 
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9.3 Das Ausgeben von Grafik 


Da wir jetzt wissen, wie wir Text ausgeben, sehen wir uns die 
Grafikausgabe an. Die am einfachsten auszugebende Grafik ist die 
Ihrer Tastatur. Mit dem CURSOR UP-Modus, CHR$S(145), können wir 
die Tastengrafik ausgeben. Probieren Sie z.B. folgendes im Kom- 
mandomodus aus: 


OPEN? ,4 
PRINT#7 ,CHRS (145) "<COMMODORE-TASTE-B>" 
CLOSE7 


Sie erhalten ein "Schachbrett"-Muster, genau das linke Zeichen 
der Taste "B". Da der CURSOR-UP-Modus den Standardwert darstellt, 
ist es nicht notwendig, zur Ausgabe jedes Grafikzeichens von der 
Tastatur CHR$(145) einzugeben. Um jedoch ganz sicher zu gehen, 
sollte es einmal irgendwo im Programm stehen. 


Um sich die verschiedenen Grafikzeichen Ihrer Tastatur anzusehen, 
lassen Sie folgendes Programm ablaufen: 


10 PRINT CHRS(147) 

20 OPEN7,4 

30 FOR I = 96 TO 127:REM CHR$ BEREICH SET#1 
40 PRINT#7,CHRS$S(145) CHRS(I) 

50 NEXT I 

60 FOR J = 161 TO 191:REM CHR$S BEREICH SET#2 
70 PRINT#7,CHRS (145) CHRS(J) 

80 NEXT J 

90 CLOSE7 


Alle Zeichen Ihrer Tastatur werden nun ausgedruckt. Aber mit Ge- 
duld und Ausdauer könnten Sie dies auch über die Tastatur errei- 
chen. CHR$(145) ist ein bißchen überflüssig, denn Sie erhalten 
das gleiche Ergebnis, wenn Sie es entfernen. Geben Sie jedoch 
CHR$S(17) an, erhalten Sie sehr viele Leerstellen, da dies der 
"Groß-/Klein"-Modus oder CURSOR-DOWN-Modus ist. 
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Erzeugen Sie Ihre eigenen Grafikzeichen auf dem Drucker 


In Kapitel 7 habe ich gezeigt, wie Sie mit Hilfe des übersetzten 
Binärcodes Sprites erzeugen können. Wir machen hier das gleiche 
mit Druckgrafik, was allerdings viel einfacher ist. Wir benutzen 
zu Anfang nur eine 7 x 7-Matrix anstelle der 24 x 21-Matrix, da 
sie weniger Berechnungen erfordert. Der VIC-1515-Drucker kann 
Grafikzeichen in einer 7 x 480-Matrix erstellen. Ich schicke Sie 
jetzt nicht weg, um Zeichenpapier zu holen, sondern wir erstellen 
unsere Matrix auf dem Drucker und ich erkläre zwischendurch 
immer, was passiert. 


Zu Beginn verwenden wir CHR$(8), um den Grafikmodus festzulegen. 
Weiterhin "bilden" wir verkettete CHR$S, die dann unser Bild ent- 
halten. Da die Bits die einzelnen Nadeln des Druckkopfes in ver- 
tikaler Richtung ansprechen, erzeugen wir vertikale Punkte an- 
statt horizontaler, wie bei unserer Spritegrafik. Wir benutzen 
jedoch das gleiche Prinzip wie bei der Spritegrafik. Unsere 7 x 
7-Matrix sieht jetzt so aus: 


Indem Sie "Punkte" in die Leerstellen eintragen, können Sie jetzt 
Figuren erstellen. Die vertikale Summe plus 128 wird dann in eine 
Form übersetzt, die der COMMODORE-64 versteht. Möchten Sie z.B. 
ein Quadrat zeichnen, müssen Sie sowohl die erste und die letzte 
Spalte, als auch die erste und letzte Reihe füllen. Beginnend bei 
der ersten Spalte, wäre der Wert I + 2 + 4 + 8 + 16 + 32 + 64 + 
128, also gleich 255. Die nächsten 5 Spalten hätten dann jeweils 
einen Punkt in der ersten und letzten Reihe. Ein Punkt in der 
ersten Reihe wäre 1, ein Punkt in der letzten Reihe 64, plus 128, 
ergibt 193. Die letzte Spalte hätte den gleichen Wert wie die 
erste, 255. Sie müßten deshalb ein CHR$S erzeugen, das folgende 
Werte hat: 


255 193 193 193 193 193 255 
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Dazu könnten Sie eine Zeile wie folgt schreiben: 


BOX$ = CHR$(255) + CHR$(193) + CHRS(193) + CHR$(193) + 
CHR$ (193) + CHR$(193) + CHR$(255) 


Das kostet eine Menge Zeit. Stattdessen wäre es viel einfacher, 
die Werte über DATA-Zeilen einzulesen, wie wir es beim Sprite 
gemacht haben, und den String auf folgende Weise zu verknüpfen. 


FOR I= 1107 

READ GRAPHIK 

GR$S = GR$S + CHRS (GRAPHIK) 

NEXT 

DATA 255,193,193,193,193,193,255 


Lassen Sie uns noch einmal das alles in einem Programm zusammen- 
fassen: 


10 PRINT CHR$S(147) 

20 FOR I = 1 TO 7:READ GRAPHIK 

30 GR$ = GR$ + CHR$ (GRAPHIK) 

40 NEXT 

50 OPEN7,4 

60 PRINT#7,CHRS(8) GRS 

70 CLOSE7 

100 DATA 255,193,193,193,193,193,255 


Wenn Sie das Programm ablaufen lassen, wird ein kleines Quadrat 
auf dem Drucker ausgegeben. Das ist nicht sehr aufregend. Sehen 
wir uns jetzt an, wie wir dieses Quadrat nutzen können, um eine 
Matrix zur Erzeugung neuer Zeichen zu erstellen. Das folgende 
Programm liefert eine 7 x 7-Matrix. Es erfordert nur geringe Än- 
derungen am Programm oben. 


10 PRINT CHR$S (147) 

20 FOR I = 1 TO 7:READ GRAPHIK 
30 GR$ = GR$ + CHRS$S (GRAPHIK) 
40 NEXT 

50 OPEN7,4 

52 FOR Y 1T0 7 

54 FOR X = 1 TO 7 

60 PRINT#7,CHRS(8) GRS; 

62 NEXT X 

64 PRINT#7 
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66 NEXT Y 
70 CLOES7 
100 DATA 255,193,193,193,193,193,255 


Wenn Sie die 7x7-Matix ausgedruckt haben, sehen Sie, wenn alles 
funktionierte, daß mehr als nötig ausgegeben wurde. Wir brauchen 
nur eine einfache Trennung zwischen den Zellen. Abgesehen davon, 
daß auch ein einzelnes Quadrat hilfreich ist, um alle verschie- 
denen Formen zu erzeugen, können Sie auch exakt die gewünschte 
Grafik erzeugen. Wenn Sie Ihren Computer das "herausfinden" las- 
sen, ist alles relativ einfach. Zu Beginn teilen wir die Aufgabe 
in einfache Gruppen. Sie wissen, daß eine vertikale Linie gleich 
CHRS(255) ist. Wir nennen sie E$. Sie wissen auch, daß CHRS(193) 
den Boden und Deckel unserer Box darstellt; wenn wir dies jedoch 
zur Erstellung einer Matrix verwenden, bekommen wir Doppellinien 
zwischen den Reihen. Wir beginnen deshalb nur mit einer Linie 
oben. Das ist einfach, da der Punkt "1" darstellt, wir "128" ad- 
dieren und damit CHR$(129) erhalten. Für die obere Linie brauchen 
wir 5 dieser Punkte. Wir können dafür eine FOR/NEXT-Schleife bis 
5 anwenden. Schließlich brauchen wir am Ende der Matrix eine 
Grundlinie. Hier zeichnen wir statt einer einfachen, eine Grund- 
linie, die aus ES und CHRS(193) besteht, und die wir als TB$S be- 
zeichnen. Unser Plan ist, erst die sechs Linien der Box mit dem 
Deckel zu zeichnen, und dann für die siebente Linie eine Reihe 
mit Deckel und Grundlinie. Es ist wichtig zu beachten, daß wir 
jetzt eine Grafikform benutzen, die größer ist als unsere 7 x 7- 
Matrix. Hier unser Programm: 


10 PRINT CHR$(147) 
20 ES = CHR$ (255) 


30 FOR I = 1 TO 5:T$ = T$ + CHRS(129) :nEXT 
40 FOR I = 1 TO 5:TB$ = TB$ + CHR$(193) :NEXT 
50 OPEN7,4 

60 FOR Y= 1 TO 6 


70 FORX = 1 T0 7 

80 PRINT#7,CHRS(8) ES TS 

90 NEXT X 

100 PRINT#7, ES$:REM ENDEKENNZEICHEN ANFÜGEN 
110 NEXT Y 

120 FOR X = 1 TO 7 

130 PRINT#7,CHR$S(8) ES TBS; 

140 NEXT 

150 PRINT#7 ,ES 

160 CLOSE7 
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Da Sie nun eine bessere Vorstellung von dem haben, was erzeugt 
werden kann, entwerfen Sie selbst ein paar originelle Druckgrafi- 
ken. 


Wiederholte Grafikausgabe 


Das letzte Element, das wir in Verbindung mit dem Drucker durch- 
gehen, ist die wiederholte Ausgabe der Grafik. Durch die Verwen- 
dung von CHR$(26) ist es möglich, jedes Grafikzeichen beliebig 
oft zu wiederholen. Das Format für die Wiederholung erfordert 
jedoch einige Sorgfalt. Gehen Sie in folgenden Schritten vor: 


1. Eintritt in den Grafikmodus mit CHR$S(8) 
2; Geben Sie das Wiederholungskommando mit CHRS (26) 


3% Geben Sie die Anzahl der Wiederholungen durch ein CHRS- 
Kommando an. Hinweis: Dies ist anders als bei den Posi- 
tionskommandos. Sie geben nicht den ASCII Code für die 
Anzahl der Wiederholungen, sondern die dezimale Zahl. 
Wenn Sie z.B. möchten, daß eine Grafik 20mal wiederholt 
wird, benutzen Sie CHRS(20). 


4. Geben Sie ein Grafikzeichen ein, auf das gewöhnlich der 
CHRS-Code für das Semikolon <CHRS(59)> folgt, so daß 
die Wiederholung in der gleichen Zeile ausgeführt wird. 


Machen wir nun ein einfaches Programm, welches einen "Balken" mit 
unterschiedlicher Länge ausgibt. Es zeigt Ihnen, wie Sie ein Pro- 
gramm starten, das eine Balkengrafik mit verschieden hohen Gra- 
phen zur Repräsentation Ihrer Daten ausgibt. 


10 PRINT CHR$ (147) :PRINT:PRINT 

20 INPUT "LÄNGE DES BALKENS" ;N 

30 RP$ = CHR$(8)+CHR$(26)+CHRS (N) :REM GRAPH + WIEDERHOLUNGEN 
+ ANZAHL 

40 VL$ = CHR$(255)+CHR$ (59) :REM VERTIKALE GRUNDLINIE PLUS 
EINEM STRICHPUNKT 

50 OPEN7,4 

60 PRINT#7,RPS VL$S 

70 CLOSE7 
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Beachten Sie, wie schnell die Balken durch den Einsatz der Wie- 
derholfunktion am Drucker ausgegeben werden. Experimentieren Sie 
mit den Kommandos und probieren Sie sie zusammen mit anderen 
Druckkommandos aus, um alles, was Sie sehen möchten, in schwarz- 
weiß zu erzeugen. 


9.4 Zusammenfassung 


Beim Kauf Ihres Druckers dachten Sie vielleicht, er könnte nur, 
wie eine normale Schreibmaschine, Text ausgeben. Wie Sie jedoch 
gesehen haben, war dies nur der Beginn. Neben der Textausgabe 
kann man verschiedene Schriftarten anwenden, eine bestimmte Posi- 
tion zur Textausgabe festlegen und sogar Grafik ausgeben. Sie 
können nicht nur die Tastaturgrafik ausdrucken, sondern auch ei- 
gene Grafiken erzeugen. Keine Schreibmaschine kann das! 


Das Geheimnis bei der Benutzung von Druckern mit Ihrem COMMODORE- 
64 liegt in der CHR$-Funktion. Einerseits werden CHR$S wie der 
ASCII Code benutzt, genau wie bei der Bildschirmausgabe. Anderer- 
seits werden sie entweder als spezielle Druckerfunktionen oder 
innerhalb bestimmter Befehlsfolgen benutzt, um Druckausgaben zu 
erzeugen. Leider ist es nicht möglich, Ihren Drucker anzuweisen, 
alles auf Papier auszugeben, was sich auf dem Bildschirm befin- 
det. Wie auch immer Sie Ihr Programm rund um die Druckausgabe 
planen, fast alles, was Sie auf dem Bildschirm ausgeben, kann 
auch ausgedruckt werden. 
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Einführung 


Nun, wir sind jetzt bereits beim letzten Kapitel. Ich habe die 
meisten Kommandos für das BASIC des COMMODORE-64 vorgeführt und 
viele Tricks für die Handhabung gezeigt. Wenn Sie ernsthaft daran 
interessiert sind, mehr über Ihren Computer zu erfahren und die- 
sen in seiner vollen Leistungsstärke auszunutzen, gibt es noch 
eine Menge zu lernen. In der Tat ist das letzte Kapitel dazu be- 
stimmt, Ihnen einige Hinweise zu geben, die über den Umfang die- 
ses Buches hinausgehen. 


Zuerst möchten wir Sie in die beste Sache seit der Entdeckung des 
Siliziums - die COMMODORE-64 User Group - einführen. Es handelt 
sich dabei um Gruppen mit starkem Interesse, den Computergebrauch 
zu maximieren. Zweitens möchte ich Sie anregen, sich Computer- 
zeitschriften durchzusehen und mehr über Ihren COMMODORE-64 zu 
lernen. Drittens untersuchen wir einige Sprachen, die neben BASIC 
auf Ihrem COMMODORE-64 anwendbar sind. BASIC hat viele Vorteile, 
aber wie jede Programmiersprache, hat es seine Grenzen und Sie 
sollten wissen, was sonst noch möglich ist. 


Zunächst möchte ich Ihnen noch mehr Programme zeigen. Es sind 
Listings von Programmen, die Sie vielleicht nützlich, lustig oder 
beides finden werden. Eines der Programme habe ich ausgewählt, um 
Ihnen einige Anwendungen aus den letzten neun Titeln zu zeigen 
und Ihr Wissen darüber noch zu vertiefen. Wir sehen uns auch 
verschiedene Arten von Programmen an, die Sie kaufen können. Sie 
sind von professionellen Programmierern geschrieben und verein- 
fachen Ihre Programme wesentlich, wodurch Sie nicht so stark in 
Anspruch genommen werden. Später werden wir noch die Hardwareum- 
gebung prüfen, die als Ergänzung Ihres COMMODORE-64 möglich ist. 


10.1 Commodore-64 User Groups 


Das hilfreichste, nützlichste und wirtschaftlichste nach dem Kauf 
Ihres COMMODORE-64 ist der Beitritt zu einer COMMODORE-64 User 
Group. Sie treffen dort nicht nur eine große Anzahl von COMMODO- 
RE-64-Anwendern, sondern Sie lernen auch das Programmieren und 
generell, was Sie mit Ihrem Computer tun oder besser: lassen 
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sollten. Der Club in Ihrer Umgebung hat vielleicht auch Anwender 
von anderen Commodore-Computern, z.B. PET oder VIC-20. 


Gewöhnlich ist der beste Weg, Kontakt mit einer der COMMODORE-64 
User Groups aufzunehmen, der über den örtlichen Computerladen. 
Sehr oft verkaufen diese Computerläden nicht nur den COMMODORE- 
64, sondern bieten auch Anwendungen dafür an. Manche organisieren 
sogar Clubtreffen. Andere Microcomputerclubs haben vielleicht 
auch COMMODORE-64-Anwender. Wenn sich jedoch in Ihrer Umgebung 
kein spezieller COMMODORE-Club befindet, schließen Sie sich einer 
allgemeinen Computer-Gruppe an. 


Um Ihre eigene COMMODORE-64 User Group zu gründen, schicken Sie 
eine Nachricht mit Angabe von Treffpunkt und Zeit an das Örtliche 
Computergeschäft und bitten Sie um Veröffentlichung des Schrei- 
bens. "Ihr" Club wird dann in den Zeitschriften aufgeführt und 
es werden sich weitere Personen finden, die sich Ihrem Club an- 
schließen wollen. Wohnen Sie in einem Gebiet mit nur wenigen 
COMMODORE-64-Besitzern oder in einer relativ kleinen Stadt, wäre 
es gut, sich einer größeren Gruppe anzuschließen. 


10.2 Commodore-64 Zeitschriften 


Es gibt verschiedene vierzehntägig oder monatlich erscheinende 
Computerzeitschriften, die Informationen über den COMMODORE-64 
bieten. Einige dieser Zeitschriften sind allgemein gehalten, an- 
dere speziell für den COMMODORE-64. Für Beginner ist es viel- 
leicht eine ganz gute Idee, sich anfangs an die speziellen COMMO- 
DORE-64-Hefte zu halten, da jeder Computer seine eigene BASIC- 
Version hat. Wir geben Ihnen hier ein kurze Übersicht über Hefte, 
die Ihre Anwendung auf dem COMMODORE-64 unterstützen: 


64-er: DAS MAGAZIN FÜR COMPUTER-FANS 
Herausgeber: 
Redaktion "64-er" 
Markt & Technik Verlag Aktiengesellschaft 
Hans-Pinsel-Str. 2 
8013 Haar bei München 


"64-er" erscheint monatlich, jeweils Mitte des Vormonats. Es 
enthält Tests und Informationen über neu erschienene Hardware. 


240 


Programmhilfen und Hinweise 


Weiterhin finden Sie Programmiertechniken, Tips und Tricks für 
Anfänger, Programmlistings, Spiele und Grafikanwendungen, sowie 
viele interessante Artikel. Das Einzelheft kostet DM 6,--. Der 
Abonnementpreis beträgt im Inland DM 72,-- für 12 Ausgaben pro 
Jahr. 


*HAPPY-*COMPUTER 

Herausgeber: 
Markt & Technik Verlag Aktiengesellschaft 
Hans-Pinsel-Str. 2 
8013 Haar bei München 


"HAPPY-COMPUTER" erscheint monatlich, jeweils Mitte des Vormo- 
nats. Es ist allgemein für Homecomputer geschrieben, enthält je- 
doch viel Information über Commodore-Computer. Inhaltlich ist es 
dem "64-er" Heft ähnlich. Das Einzelheft kostet DM 5,--. Der 
Abonnementpreis beträgt im Inland 55,-- DM pro Jahr für 12 Ausga- 
ben. 


CH IP Das Computer-Magazin 
Herausgeber: 

Vogel-Verlag KG Würzburg 
Redaktion: 

Redaktion CHIP 

Bavariaring 8 

8000 München 2 


"CHIP" erscheint monatlich. Es ist ein allgemeines Magazin für 
Microcomputer, das unter anderem Informationen und Programmli- 
stings für Commodore-Computer bietet. Das Einzelheft kostet im 
Inland DM 6,--. Der Preis für das Jahresabonnement für das Inland 
beträgt DM 66,--. 


Es gibt jedoch noch viele andere mehr. Sie finden eine große Aus- 


wahl in Computershops und im Zeitschriftenhandel. Dies sollte nur 
eine Anregung darstellen. 
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10.3 Der Commodore-64 spricht mehrere Sprachen 


Außer in BASIC kann Ihr Computer in verschiedenen anderen Spra- 
chen programmiert werden und diese auch ausführen. In einigen 
Fällen erfordert dies eine spezielle Hardware und vor allem die 
entsprechende Software. Wir sehen uns einige dieser Sprachen an. 





Eine babylonische Sprachenvielfalt. 


ASSEMBLER 


Assembler ist eine maschinenorientierte Sprache. Sie ist schnel- 
ler als BASIC und jede andere Sprache, die wir uns noch ansehen. 
Um Programme in Assembler zu erstellen, ist es nötig, einen "As- 
sembler" für die Codeeingabe zu besitzen. Diese Sprache ermög- 
licht Ihnen eine bessere Kontrolle über Ihren COMMODORE-64 als 
BASIC, ist jedoch schwerer zu erlernen, da ein Assemblerprogramm 
mehr Instruktionen benötigt als BASIC. (Der Objektcode ist jedoch 
kompakter und benötigt weniger Sektoren auf Ihrer Diskette.) Der 
Assembler der Commodore Inc., ASSEMBLER 64, braucht die 1541-Dis- 
ketteneinheit, da sich der Macroassembler und Dienstprogramme auf 
der Diskette befinden. Er enthält zwei maschinensprachliche Moni- 
torprogramme, Editor- und Ladeprogramme. 
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Um die Assemblersprache zu erlernen, werden verschiedene Bücher 
für den COMMODORE-64 am Markt angeboten. Ferner erhalten Sie auch 
Hilfe über User Groups. Verschiedene Institutionen bieten dazu 
auch Lehrgänge an. 


Maschinenorientierte und höhere Programmiersprachen 


Stellen Sie sich unter den Ausdrücken "Maschinensprache" 
oder "höhere Programmiersprache" folgendes vor: Unter einer 


höher entwickelten Programmiersprache versteht man eine 
stark an die englische Sprache angelehnte Programmierung. 
Assembler stellt eine Maschinensprache dar. Die weiteren 
Sprachen, die wir uns ansehen, sind höher entwickelte Pro- 
grammiersprachen. 





PASCAL 


PASCAL ist eine höhere Programmiersprache, die eigentlich für den 
Unterricht in strukturierter Programmierung entwickelt wurde. Sie 
ist schneller als BASIC, andererseits nicht so schwer zu handha- 
ben wie ASSEMBLER. Es ist möglicherweise die bekannteste höher 
entwickelte Programmiersprache neben BASIC. Sie werden verschie- 
dene Versionen von Pascal finden. Die Sprache ist jedoch ziemlich 
gut standardisiert, so daß jede Version von Pascal mit anderen 
Pascalprogrammen zusammenarbeiten kann. 


Auch hierzu sind verschiedene Bücher erhältlich, um das Program- 
mieren in Pascal zu erlernen. 


FORTH 


FORTH ist eine sehr schnelle höhere Programmiersprache, die ent- 
wickelt wurde, um Programme zu erstellen, die fast so schnell wie 
ASSEMBLER-Programme sind, aber weniger Zeit zur Programmerstel- 
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lung benötigen. Schneller als PASCAL, BASIC, FORTRAN, COBOL und 
jede andere höhere Programmiersprache, wird FORTH durch Definie- 
ren von "Wörtern" programmiert, welche Routinen ausführen. Vom 
Anwender selbst definierte Befehle werden mit den bereits imple- 
mentierten zu FORTH-Programmen verbunden. Das beste an FORTH ist, 
daß mehrere Implementierungen "offene Versionen" darstellen. Die 
FIG (FORTH Interset Group) FORTH Version liegt in diesem offenen 
Bereich. Wenn Sie in Assembler geübt sind, wird es Ihnen auch 
gelingen, Ihre eigene Version zu installieren. 


CP/M 


Für den COMMODORE-64 sind verschiedene exzellente CP/M-Programme 
erhältlich. CP/M hat eine der größten Bibliotheken für alle Spra- 
chen. Um CP/M für Ihren Computer benutzen zu können, brauchen Sie 
ein Z-80-Microprozessor-Steckmodul, von denen verschiedene er- 
hältlich sind. Viele Geschäftspakete, einschließlich Textverar- 
beitung und Datenbankprogrammen, sind für CP/M zu bekommen. Für 
alle, die an professionellen Anwendungen interessiert sind, ist 
CP/M unbedingt sehenswert. Der COMMODORE-64 hat ein einsteckbares 
z-80 Paket, das nur hinten in Ihren Computer gesteckt wird. Es 
wird mit einer Diskette geliefert, auf der sich das CP/M-Be- 
triebssystem befindet. Wenn Sie CP/M auf Ihrem COMMODORE-64 lau- 
fen lassen, übernimmt der Z-80-Microprozessor die Operationen vom 
6510. Mit der Commodore Z-80-Erweiterung, haben Sie im Prinzip 
zwei Computer. Der Commodore Z-80 und das Z-80-Handbuch sind über 
Ihren Commodore-Händler zu beziehen. Mit der CP/M-Erweiterung 
können Sie alle unter CP/M lauffähigen Programme installieren und 
laufen lassen, einschließlich anderen Programmiersprachen, wie 
PASCAL und FORTH. 


Vielseitige Sprachen 


Außer den oben beschriebenen Sprachen können Sie Disketten bekom- 
men, die COBOL, FORTRAN, PILOT und andere Sprachen für allgemeine 
und besondere Anwendungen enthalten. LOGO und PILOT werden zum 
Beispiel verwendet, um Kinder in die Programmierung einzuweisen, 
während COBOL hauptsächlich für kommerzielle Anwendungen einge- 


244 


Programmhilfen und Hinweise 


setzt wird. Bevor Sie Zeit, Geld und Mühe in eine andere Program- 
miersprache investieren, empfehlen wir genau zu prüfen, zu wel- 
chem Zweck Sie diese brauchen. Wenn Ihr Hauptinteresse in der 
Entwicklung eigener Programme liegt, lernen Sie zuerst vollstän- 
dig BASIC und probieren Sie aus, was Sie damit alles machen kön- 
nen. Wenn das voll Ihren Bedürfnissen entspricht und für Ihre An- 
wendung die Geschwindigkeit eine untergeordnete Rolle spielt, ist 
es besser, bei BASIC zu bleiben und es auszubauen. Liegt Ihr 
Hauptinteresse aber in der Verwendung von Anwendungsprogrammen, 
hängt die Fähigkeit der Sprache von den benutzten Programmen ab. 
Das wichtigste in diesem Zusammenhang ist die Frage, ob Sie CP/M 
verwenden oder nicht. Wenn Sie dies möchten, brauchen Sie die Z- 
80-Erweiterung. Fast alle anderen professionell erstellten Pro- 
gramme laufen auf dem COMMODORE-64 ohne zusätzliche Hardware- 
erweiterung. 


Wenn Sie meinen, daß BASIC die für Sie am besten geeignete Pro- 
grammiersprache ist, Sie aber Ihre Programme beschleunigen möch- 
ten, erreichen Sie dies auf einfachem Weg mit einem Compiler. Im 
Prinzip ist ein Compiler ein Programm, das Ihren Code in eine bi- 
näre Datei umformt, das 4- bis 5mal schneller ist als das COMMO- 
DOERE-64 BASIC. Sie müssen dazu nur Programme in BASIC schreiben, 
diese dann compilieren, und das compilierte Programm abspeichern. 
Von da an läuft Ihr compiliertes Programm wie ein Programm in Ma- 
schinensprache ab. 


10.4 Sortier-Routinen 


Diese Programme sortieren Strings für Sie. Sie stellen verschie- 
dene Algorithmen dar. Sie können sehen, daß manche Algorithmen 
schneller arbeiten als andere. Der "Bubble Sort" ist für gänzlich 
unsortierte Listen der einfachste und langsamste der drei. Er ar- 
beitet aber sehr gut mit teilweise sortierten Listen. "Shell 
Sort" und "Quick Sort 2" arbeiten generell viel schneller als der 
"Bubble Sort", benutzen jedoch weit mehr komplexe Formeln. Testen 
Sie alle drei Typen, um zu sehen, welcher Sort für Ihre Bedürf- 
nisse am besten geeignet ist. Sie brauchen diese Sorts wahr- 
scheinlich in Programmen, die eine alphabetische Reihenfolge für 
die Verarbeitung voraussetzen. 
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Bubble Sort 


PRINT CHR$(147) 

INPUT "WIEVIEL WÖRTER" ;N% 
DIM AS (N%+1) 

FOR N = 1 TO N% 


50 INPUT "WORT EINGEBEN" ;AS(N) 

60 2 = 2 +1 

70 NEXT N 

80 PRINT CHRS(147):FOR I = 1 TO 10 :PRINT:NEXT 

83 M$="ALPHABETISCH" 

90 L = 20 - LEN(MS)/2:PRINT CHR$S(18) ;SPC(L) ;M$S:PRINT 
CHRS (146) 

100 REM KKAKKKKAKKKAKKKKKKKKCKK KH, 

110 REM BUBBLE SORT 

120 REM KUH HH KHK u 

130T=N-1 

140 FLIP = 0:FOR S = 1 TO T:IF AS$S(S) <= AS(S+1) THEN 160 
150 SWITCH$S = AS(S):A$S(S) = AS(S+1) :A$S (S+1)=SWITCHS:FLIP=1: 
155T=S 

160 NEXT S:IF FLIP = 1 THEN 140 

200 REM *%*%* BILDSCHIRMAUSGABE *** 

210 REM *** IN ALPHABETISCHER REIHENFOLGE *** 

220 FORN = 2 TO Z+1 

230F=F+iIIl 

240 IF F > 22 THEN GOSUB 300 

250 PRINT AS$S(N) 

260 NEXT N 

270 END 

300 REM *%*%* PAUSE, WENN BILDSCHIRM VOLL **% 

310 PRINT CHR$(18); "MIT BELIEBIGER EINGABE WEITER" 

320 GET ANS:IF ANS = "" THEN 320 

330 F = 0:PRINT CHRS(146) 

340 RETURN 
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PRINT CHR$S (147) 
INPUT "WIEVIEL WÖRTER" ;N% 
DIM AS(N%+1) 
FOR N = 1 TO N% 
INPUT "WORT EINGEBEN" ;AS(N) 
Z 2 +1 
NEXT N 
PRINT CHRS(147):FOR I 
MS= "ALPHABETISCH" 

L 20 


1 TO 1 


CHR$ (146) 


100 
110 
120 
130 
140 
150 
160 
170 
180 
182 
184 
190 
200 
210 
220 
230 
240 
250 
260 
270 
300 
310 
320 
330 
340 


KAAKKKKKKKKKKKKKKKKKHK =, 


SHELL SORT 

2 & 222 2 1272 7202 22232 52 2022722 )27 

1 

2 * Y:IF Y <= N THEN 40 
INT(Y / 2).IF Y = 0 THEN 
FOR X = 1 TO N-Y:2Z X 
K=Y+ 
SWITCHS 
Z 2 - 
IF 2> 0 THEN 170 

NEXT X:GOTO 150 

REM %*%*% BILDSCHIRMAUSGABE *%% 


REM 


A$S(Z):AS$S(Z) = AS(K) 


Z 
Y 


- LEN(M$)/2:PRINT 
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0 :PRINT:NEXT 


CHRS (18) ;SPC(L) ;M$:PRINT 


200 


:IF AS(Z) <= AS(K) THEN 190 


:AS (K) SWITCHS 


REM **%* IN ALPHABETISCHER REIHENFOLGE *** 


FOR N = 2 TO V+1 
F=F+1l 

IF F > 22 THEN GOSUB 300 
PRINT AS(N) 

NEXT N 

END 


REM *%*% PAUSE, WENN BILDSCHIRM VOLL %%%* 
PRINT CHRS$ (18); "MIT BELIEBIGER EINGABE WEITER" 


GET ANS:IF ANS = "" THEN 320 
F 0:PRINT CHRS (146) 
RETURN 
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Quick Sort 


10 PRINT CHR$(147) 

20 INPUT "WIEVIEL WÖRTER" ;N% 

30 DIM AS (N%+1) 

40 FOR N = 1 TO N% 

50 INPUT "WORT EINGEBEN" ;AS(N) 

600 2=2 +1 

70 NEXT N 

80 PRINT CHRS(147):FOR I = 1 TO 10 :PRINT:NEXT 
83 MS="ALPHABETISCH" 

90 L = 20 - LEN(MS)/2:PRINT CHRS (18) ;SPC(L) ;MS: PRINT 
CHRS (146) 

100 REM KKAKKKuKcKc cc KH ca a cc 

110 REM QUICKSORT 2 

120 REM KHrHH HH a a cc 


122 PRINT CHR$S(147) 


12551 = 1 
130 L(1) = 1 
140 R(1) = N 


150 LI = L(S1) 

160 RI = R(S1) 
170SsS1I=-5S1-1 

180 L2 = L1 

190 R2 = RI 

200 X$ = AS(INT((L1I + R1)/2)) 
210C=C+H+]I 

220 ID AS$S(L2) >= X$ THEN 250 
230 L2 = [2 +1 

240 GOTO 210 

250C= C1 

260 IF X$ >= A$(R2) THEN 290 
270R2=R2 -1 

280 GOTO 250 

290 IF L2 > R2 THEN 360 
300S=-S+1 

310 T$ = AS$(L2) 

320 A$S(L2) = AS(R2) 

330 AS(R2) = TS 

340 L2 = L2 +1 
350R2=R2-1 

360 IF L2 <= R2 THEN 210 

370 IF L2 >= Ri THEN 410 
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380 SI =SiI +1 


390 L(S1) = L2 
400 R(S1) = Rl 
410 Ri = R2 


420 IF Li < Ri THEN 180 

430 IF SI > 0 THEN 150 

440 REM **%* SORT BEENDET *** 

500 REM *%% BILDSCHIRMAUSGABE *** 

510 REM *%*%* IN ALPHABETISCHER REIHENFOLGE *%** 
520 FOR N = 2 TO V+1 

530F=rF+i1l 

540 IF F > 22 THEN GOSUB 300 

550 PRINT AS(N) 

560 NEXT N 

570 END 

1000 REM *** PAUSE, WENN BILDSCHIRM VOLL *%** 
1010 PRINT CHRS$S(18);"MIT BELIEBIGER EINGABE WEITER" 


1020 GET ANS:IF ANS = "" THEN 320 
1030 F = 0:PRINT CHRS$(146) 
1040 RETURN 


10.5 Tastaturtricks 


Bevor Sie das folgende lesen, versprechen Sie, sich nicht zu är- 
gern! Einverstanden? Gut, nun können Sie es lesen. Bis zu diesem 
Punkt haben wir eine Anzahl von Abkürzungen für Ihre Tasten nicht 
verwendet. Dies war notwendig, damit Sie zuerst in der korrekten 
Anwendung Ihrer Kommandos Sicherheit bekommen. Sie werden auch 
sehen, daß Ihnen diese Abkürzungen nicht klar zeigen, was auf 
Ihrem Computer abläuft, was aber bei der vollen Schreibweise 
durchaus der Fall ist. Im ANHANG D Ihres COMMODORE-64-HANDBUCHS 
befindet sich eine Tabelle, die Ihnen zeigt, wie Sie den ersten 
oder die beiden ersten Buchstaben eines Kommandos, die SHIFT-Ta- 
ste und dann den zweiten (oder dritten) Buchstaben eingeben müs- 
sen, um das gesamte Kommando zu bekommen. Das erspart Ihnen viel- 
leicht etwas Programmierzeit, die Kommandos sind jedoch anfangs 
ziemlich schwer zu lesen. Bringen Sie zum Beispiel ein Programm 
in den Speicher, und geben Sie "L<SHIFT-I>(147)" und <RETURN> 
ein. Dieses Kommando ist das gleiche wie LIST, aber Sie müssen 
statt vier nur zwei Tasten drücken. Leeren Sie jetzt Ihren Spei- 
cher und geben Sie folgendes ein: 
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10 ?C<SHIFT-H>(147):A$ = "IN ORDNUNG" 
20 ?S<SHIFT-P>10) ;R<SHIFT-I>(A$,5) 


Wissen Sie, bevor Sie RUN eingeben, was passiert? Wenn nicht, ma- 
chen Sie sich keine Gedanken; es ist auch ein bißchen verwirrend, 
speziell die Darstellung auf dem Bildschirm. Wenn Sie RUN einge- 
ben, wird der Bildschirm gelöscht und die Nachricht "IN ORDNUNG" 
am oberen Bildschirmrand, an zehnter Stelle von links, ausgege- 
ben. Listen Sie Ihr Programm auf, und alle Kommandos sind klar. 
Diese Abkürzungen sind einerseits hilfreich, anderseits unklar. 
Das LIST-Kommando wird gewöhnlich im Kommandomodus gegeben und es 
ist geschickt, es in der abgekürzten Form zu verwenden. Ansonsten 
sind diese Abkürzungen für Anfänger eher verwirrend. Benutzen Sie 
diejenen, die Ihnen am leichtesten fallen und wenden Sie nach 
und nach immer mehr Abkürzungen an. 


Benutzen von WAIT 


Ein Statement, das wir bis jetzt nicht besprochen haben, ist 
WAIT. Die Beschreibung des Einsatzes von WAIT ist ziemlich komp- 
liziert, und wir werden deshalb nicht so tief einsteigen. Es ar- 
beitet in ähnlicher Weise wie GET; aber es befindet sich kein 
Cursor auf dem Bildschirm. Es dient einer klaren Benutzerpro- 
grammkontrolle. WAIT kann auch in Spielprogrammen mit dem Joy- 
stick dazu benutzt werden, auf eine Eingabe zu warten. Ich zeige 
Ihnen hier, wie Sie damit ein Programm stoppen, bis eine Taste 
gedrückt wird. Geben Sie folgendes Programm ein und probieren Sie 
es aus: 


10 PRINT CHRS (147) 

20 FOR I = 1 TO 10:PRINT:NEXT I 

30 PRINT "<DRÜCKEN SIE EINE TASTE UM FORTZUSETZEN>" 
40 WAIT 197,64: WAIT 197,64,64 

50 PRINT:PRINT "PROGRAMM LÄUFT WEITER ..." 


250 


Programmhilfen und Hinweise 


Funktionstasten 


Rechts auf Ihrer Tastatur befinden sich vier Tasten, die wir bis 
jetzt nicht beachtet haben. Sie werden "Funktionstasten" genannt 
und durch CHR$-Werte von 133 bis 140 ausgeführt. Sie werden lau- 
fend abgefragt und wenn Sie eine dieser "8" Tasten (4 ohne SHIFT 
und 4 in Verbindung mit SHIFT) gedrückt haben, verzweigt das Pro- 
gramm in eine Unterroutine. Sie enthalten Anwendungen, die der 
Benutzer durch den Tastendruck startet, während andere Tasten für 
die Eingabe von Buchstaben und Grafikzeichen benutzt werden. 
Nehmen wir an, Sie möchten ein Programm haben, das Namen eingibt, 
bis eine bestimmte Taste gedrückt wird. Da Sie nicht möchten, daß 
diese Taste durch eine Eingabetaste für die Namen dargestellt 
wird, verwenden Sie für diesen Zweck die Funktionstasten. Die 
CHRS-Werte von 133 bis 140 sind mit den Tasten 1 bis 8 verbunden, 
die Tasten ohne SHIFT von CHRS(133) bis CHRS$S(136), die Tasten in 
Verbindung mit SHIFT von CHR$(137) bis CHR$(140). Zum Beispiel 
entspricht CHR$(133) der Funktionstaste 1 (f1), CHRS(137) - (£2), 
CHRS$S (134) - (£f3) usw. und CHR$S(140) - (f8). Das folgende Programm 
zeigt Ihnen, wie Sie ein Programm zur Benutzung der Funktions- 
tasten vorbereiten. Nur die Tasten 1,5 und 8 werden benutzt und 
das Programm wird beendet, wenn die Taste f5 gedrückt wird. 


10 PRINT CHR$ (147) 


20 GET AS 

30 PRINT CHR$ (19) 

40 IF A$S = CHR$S(133) THEN GOSUB 1000 
50 IF A$S = CHRS$S(140) THEN GOSUB 2000 
60 IF AS = CHRS(135) THEN END 


70 PRINT "WÄHLEN SIE FUNKTIONSTASTE 1 ODER 8" 

80 PRINT "BEENDEN MIT FUNKTIONTASTE 5" 

90 GOTO 20 

1000 PRINT CHR$(147) :PRINT "SIE HABEN FT 1 AUSGEWÄHLT" 
1010 PRINT "WEITER MIT BELIEBIGER EINGABE" 

1020 WAIT 197,64:WAIT 197,64,64 

1030 PRINT CHRS$ (147) :RETURN 

2000 PRINT CHR$(147):PRINT "SIE HABEN FT 8 AUSGEWÄHLT" 
2010 PRINT "WEITER MIT BELIEBIGER EINGABE" 

2020 WAIT 197,64:WAIT 197,64,64 

2030 PRINT CHRS(147) :RETURN 
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10.6 Hilfsprogramme 


Was ist ein Hilfsprogramm? 


Hilfsprogramme (Utilities) sind Programme, die Sie in der Pro- 
grammierung oder Ausführung von Systemroutinen unterstützen. Wenn 
Sie einer COMMODORE-64 User Group angehören, werden Sie mehr über 
Hilfsprogramme und ihre Anwendung erfahren. Wie bei allen anderen 
Programmen, die Sie eventuell kaufen möchten, fragen Sie zuerst 
andere Clubmitglieder und lassen Sie sich diese Programme vorfüh- 
ren! 





10.7 Textverarbeitung 


Mit einem Textverarbeitungsprogramm kann Ihr COMMODORE-64 in ein 
erstklassiges Textverarbeitungssystem gewandelt werden. Mit die- 
sem System können Sie alles machen, von der Versetzung von Blök- 
ken bis zum Auffinden von bestimmten Wörtern im Text. Sie können 
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Text in Sekunden editieren und genauso schnell Änderungen vorneh- 
men. Wenn Sie einmal mit Textverarbeitung gearbeitet haben, möch- 
ten Sie nie wieder einen Brief mit der Schreibmaschine tippen. 
Dieses Buch wurde mit Hilfe eines Textverarbeitungsprogramms in 
einem Bruchteil der Zeit erstellt, die man mit einer Schreibma- 
schine benötigen würde. 


Es gibt auch einige Einschränkungen bei der Anwendung eines Text- 
verarbeitungssystems. Erstens stellt der COMMODORE-64 nur 40 Zei- 
chen am Bildschirm dar. Da der Standardwert 80 Zeichen beträgt, 
beunruhigt die Darstellung auf dem Papier manche Leute, da diese 
nicht mit der Darstellung auf dem Bildschirm übereinstimmt. Da 
ich jedoch Schriften erstelle, die in einer Breite von 40 bis 132 
Spalten auf dem Drucker ausgegeben werden, irritiert mich diese 
Tatsache keineswegs. Wenn Sie 80 Zeichen auf dem Bildschirm dar- 
gestellt haben möchten, können Sie einen Adapter kaufen, der 
Ihnen das ermöglicht. Mit Hilfe des 80-Zeichen-Adapters sehen Sie 
auf dem Bildschirm exakt das gleiche Bild wie auf Ihrer Druckaus- 
gabe. Fragen Sie Ihren örtlichen Commodore-Händler danach. 


Im folgenden zeige ich Ihnen einige Möglichkeiten, nach denen Sie 
bei Ihrem Textverarbeitungsprogramm vielleicht suchen werden: 


1. Finden/Ersetzen 
Findet jeden String in Ihrem Text und/oder findet und 
ersetzt jeden String durch einen anderen. Das ist gut, 
um Schreibfehler bei einzelnen Wörtern oder ganze Ab- 
schnitte auszubessern. 


2. Blockbewegungen 
Versetzt Textblöcke von einem Platz an einen anderen. 
(z.B. versetzt einen Abschnitt aus der Mitte des Textes 
zum Ende eines Dokumentes.) Eine sehr nützliche Funk- 
tion. 


3; Einbinden von Dateien 
Verknüpft einzelne Dateien einer Diskette. Dies ist 
sehr wichtig bei längeren Dokumenten oder für standar- 
disierte Kurzdokumente. 


4. Zeilen- und bildschirmorientiertes Editieren 
Das zeilenorientierte Editieren erfordert das Lokali- 
sieren des Zeilenanfangs. Bildschirmorientiertes Edi- 
tieren erlaubt das Starten des Editiervorgangs an jeder 
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beliebigen Stelle des Textes. Die zweite Form ist be- 
sonders für längere Dokumente von Vorteil. 


5% Automatische Seitennumerierung 
Seiten werden automatisch durchnumeriert, ohne den Um- 
bruch auf die nächste Seite festlegen zu müssen. 


6. Eingebaute Druckersteuerung 

Dies ermöglicht dem Benutzer, spezielle Instruktionen 
direkt an den Drucker zu schicken. Dazu gehören z.B. 
die "Punktkommandos", die u.a. den linken Rand der 
Druckausgabe regulieren. Weiterhin gibt es spezielle 
Kommandos, die die Schriftarten wechseln und vieles an- 
dere mehr mit dem auszugebenden Text durchführen, ohne 
daß man vorher Parameter festsetzen muß. Man kann aber 
auch gesetzte Parameter überschreiben. 


Dies ist nur eine kleine Auswahl der Möglichkeiten, die Sie bei 
der Textverarbeitung haben. Als Faustregel gilt: je mehr ein 
Textverarbeitungsprogramm kann, desto mehr kostet es. Wenn Sie 
nur Briefe und kurze Dokumente schreiben möchten, ist es nicht 
erforderlich, ein teures Textverarbeitungssystem zu kaufen. Wenn 
Sie jedoch längere, komplexere und größere Mengen von Dokumenten 
schreiben, ist die Investition eines höher entwickelten Textver- 
arbeitungsprogramms die Mehrkosten wert. Haben Sie spezielle An- 
forderungen (z.B. die Erstellung von Rechnungsformularen), soll- 
ten Sie nach diesen Möglichkeiten in einem Textverarbeitungspro- 
gramm suchen. Möglicherweise ist ein Programm, das vielleicht 
bestimmte Bereiche nicht abdeckt, gerade für Ihre speziellen An- 
forderungen das richtige. Lassen Sie sich, wie bei allen anderen 
Programmen, eine ausführliche Dokumentation verschiedener Text- 
verarbeitungsprogramme auf dem COMMODORE-64 geben, bevor Sie ei- 
nes davon kaufen. 


Noch ein wichtiger Hinweis: es nimmt einige Zeit in Anspruch, 
alle Möglichkeiten des Textverarbeitungssystems zu nutzen und es 
effektiv einzusetzen. Es ist möglich, zu Beginn nur Text einzuge- 
ben, während es einiger Praxis bedarf, um alle Leistungsmerkmale 
voll auszunutzen. Wenn Sie einmal alle Techniken Ihres Textverar- 
beitungsprogramms kennen, werden Sie schwören, daß Ihr Programm 
das beste ist! Genießen Sie deshalb mit Vorsicht Argumente über 
das "optimale Textverarbeitungsprogramm". Es ist wie bei einer 
Diskussion über Politik oder Religion. Wenn Sie einen Drucker ha- 
ben, vergewissern Sie sich, daß das Programm auch Text auf Ihren 
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Drucker ausgibt. Dies ist speziell der Fall, wenn Sie einen pa- 
rallelen Druckadapter haben. 


10.8 Datenbankprogramme 


Wenn Sie ein Programm brauchen, das Informationen erzeugt und ab- 
speichert, ist ein "Datenbank"-Programm erforderlich. Grundsätz- 
lich sind professionelle Datenbankprogramme entweder sequentielle 
Dateien oder mit direktem Zugriff. Wenn Sie das Programm verwen- 
den, benutzen Sie bereits definierte Felder, um gewünschte Felder 
zu erzeugen oder bereitzustellen. Zum Beispiel hält sich ein 
Benutzer eine Datenbank für Kunden. Zusätzlich zu den Feldern für 
Name und Adresse braucht der Anwender vielleicht spezielle Felder 
für bevorzugte Produkte des Kunden, das Datum der letzten Bestel- 
lung, die Höhe des letzten Auftrags, das Datum des letzten Zah- 
lungseingangs, usw. 


Datenbankprogramme sollten vor dem Kauf besonders gründlich ge- 
prüft werden. Einige der teuren Datenbanken können praktisch mit 
jeder anderen Anwendung genutzt werden. Wenn Sie jedoch ein Da- 
tenbanksystem nur dazu benutzen, eine Liste von Namen und Adres- 
sen zu speichern, um Adressenaufkleber zu drucken, macht dies 
eine speziell dafür entwickelte Datenbank besser, und dazu für 
weniger Geld. In manchen Fällen leistet das sogar eine Textverar- 
beitung. Wenn Ihre Bedürfnisse jedoch sehr unterschiedlich sind 
und die Gestaltung von Masken und variablen Satzlängen erfor- 
dern, wählen Sie nicht das einfachste Programm, um diese Arbeit 
durchzuführen. 


10.9 Programme für kommerziellen Einsatz 


Kommerzielle Programme gibt es wie Sand am Meer. Es ist das be- 
ste, bei der Suche nach dem geeigneten Programm von Ihren spe- 
ziellen Bedürfnissen auszugehen. Auf der anderen Seite gibt es 
kommerzielle Programme, die für viele bestimmte Branchen anwend- 
bar sind. Ebenso gibt es verschiedene Kalkulationsprogramme und 
die oben bereits erwähnten Datenbanken. 
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Leider geben Geschäftsleute oft große Summen für Systeme aus, die 
nicht funktionieren. Sie glauben, wenn Soft- und Hardware sehr 
teuer sind, müssen sie besser als weniger teure Systeme sein. Das 
kommt wahrscheinlich von der "Sie bekommen nur das, was Sie zah- 
len"-Mentalität, die zum Kauf von Systemen verleitet, die man gar 
nicht voll ausnutzen kann. 


Da die Computer immer weiter entwickelt und immer preisgünstiger 
werden, bekommen Sie oft nicht das "für was Sie zahlen", wenn Sie 
ein sehr teures System kaufen. Oft haben Geschäftsleute am Ende 
eine riesige Anlage, die überholt, zu groß und zu teuer für ihre 
Bedürfnisse ist. Einige Computerhändler haben sich auf Geschäfts- 
leute spezialisiert. Sie helfen bei der Auswahl des geeigneten 
Systems in Ihrer Branche, trainieren das Büropersonal und bieten 
Wartungsverträge für das System an. 


Es ist gut möglich, daß Sie in diesen Spezialgeschäften einen hö- 
heren Preis als in einem Diskountladen bezahlen. Sie werden je- 
doch bei Problemen jeder Art von diesen Spezialgeschäften unter- 
stützt. Da der COMMODORE-64 für Anfänger sehr preisgünstig ist, 
lohnen sich die Extrakosten, die Sie bei einem Händler zahlen. 


Alternativ dazu gibt es auch Unternehmensberater für EDV, die Ih- 
nen bei der Auswahl des geeigneten Systems helfen. Wenn Sie einen 
Berater suchen, sehen Sie sich nach einem um, der vernünftige 
Preise hat und unabhängig von einem Hardwarehändler ist. Kontak- 
tieren Sie einen Berater über Telefon, erzählen Sie ihm, daß Sie 
sich einen COMMODORE-64 kaufen möchten und informieren Sie ihn 
genau über alle Ihre Anwendungen und Bedürfnisse. Wenn diese mit 
dem System übereinstimmen, wird er Ihnen die erforderliche Soft- 
ware und die benötigten peripheren Geräte vorschlagen. Wenn er 
versucht, Ihnen einen anderen Computer vorzuschlagen, ist ihm 
vielleicht das System unbekannt, und Sie sollten noch einen wei- 
teren Berater befragen. 


Wenn Ihnen aber mehrere Berater unabhängig voneinander mitteilen, 
daß der COMMODORE-64 nicht das richtige System für Ihre Bedürf- 
nisse ist, brauchen Sie tatsächlich eine größere Anlage. 


Das soll nicht zynisch klingen, aber ich habe schon viele un- 
glückliche Geschäftsleute getroffen, die das falsche System ge- 
kauft haben. Ein Geschäftsmann erzählte mir, daß er eine Anlage 
für DM 35.000,-- gekauft hat, die seine Anforderungen nicht er- 
füllen konnte. Schließlich entschied er sich für einen Microcom- 
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puter, der etwa ein Zehntel des Preises kostet und alles war in 
bester Ordnung. Damit ist natürlich nicht gesagt, daß man in man- 
chen Branchen nicht eine teurere EDV-Anlage benötigt, um damit 
bestimmte Funktionen ausführen zu können; denn auch der COMMODO- 
RE-64 hat seine Grenzen. 


Bevor Sie sich ein System kaufen, vergewissern Sie sich, daß es 
Ihre Aufgaben übernehmen kann, und überzeugen Sie sich, daß es in 
einer Weise arbeitet, mit der Sie zufrieden sind. Häufig finden 
Sie preisgünstige neue Micros, wie den COMMODORE-64, die wirklich 
besser arbeiten als kostspielige große Maschinen. 


10.10 Grafik Pakete 


In unserem Kapitel über Grafik habe ich die Grafikmöglichkeiten 
des COMMODORE-64 demonstriert. Bestimmte Anwendungen erfordern 
jedoch entweder weiter entwickelte Programmierfähigkeiten oder 
gute Grafikpakete. So ist es zum Beispiel möglich, mit hochauf- 
lösender Grafik zu zeichnen wie mit einer Farbpalette. Die er- 
zeugten Bilder können auf Diskette abgespeichert oder über einen 
Drucker ausgegeben werden. 


10.11 Hardware 


Der COMMODORE-64 ist "ausbaufähig". Das bedeutet, daß Sie ver- 
schiedene Erweiterungen einbauen und damit seine Leistungsfähig- 
keit erheblich erhöhen können. An der Rückseite Ihres Gerätes 
finden Sie drei freie Zugänge, in die Sie Erweiterungseinheiten 
einstecken können. Weiterhin sind auf der rechten Seite zwei 
Anschlüsse für Paddles und/oder Joystick, die sowohl für Spiel- 
programme als auch für alle anderen eingesetzt werden können. Bei 
Spielprogrammen bewegt man mit ihrer Hilfe Raketen, Raumschiffe 
und andere Symbole. Sie werden aber auch dazu benutzt, Grafik zu 
erstellen. 


Weitere Hardwareerweiterungen sind Schnittstellen für unter- 


schiedliche periphere Geräte. Eine davon, genannt IEEE-Interface, 
kann bis zu 15 (!) Geräte an Ihren COMMODORE-64 anschließen. 
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Ein weiteres wichtiges Peripheral, das Sie sich ansehen sollten, 
ist die Parallel-Interface-Platine. Mit dieser können Sie Ihren 
COMMODORE-64 an verschiedene günstige Drucker mit parallelem 
Interface anschließen. 


Vergewissern Sie sich vor dem Kauf einer Schnittstelle oder eines 
Zusatzgeräts, daß dieses mit Ihrem Computer zusammen arbeitet. 
Leider werden viele Hardwareerweiterungen mit einer schlechten 
Dokumentation geliefert, so daß es oft schwer ist, sie ohne frem 
de Hilfe richtig zum Laufen zu bringen. Auch hier ist eine User 
Group von unschätzbarem Wert. Fragen Sie andere Mitglieder nach 
Erfahrungen mit diesen Zusatzgeräten, bevor Sie sich für eines 
entscheiden. 


10.12 Modems und Datenkommunikation 


Die reizvollste Sache, die Sie mit Ihrem Computer machen können, 
ist die Kommunikation mit einem anderen Computer. Sie können 
nicht nur mit anderen COMMODORE-64 kommunizieren, Sie können dies 
auch mit anderen Micros tun und sich sogar mit EDV-Großanlagen in 
Verbindung setzen. Mit einem Modem und der entsprechenden Soft- 
ware sind Sie dazu in der Lage. Das Modem muß eine FTZ-Nummer vom 
Fernmeldetechnischen Zentralamt haben, damit Sie es betreiben 
dürfen. Holen Sie sich darüber bei der Deutschen Bundespost In- 
formationen. 


10.13 Zusammenfassung 


Das Wichtigste aus diesem Kapitel ist, daß wir Ihnen nur einen 
groben Überblick über die Möglichkeiten für die Erweiterung Ihres 
COMMODORE-64 aufgezeigt haben. Es gibt da noch sehr viel mehr als 
das, was man in einem Kapitel darstellen kann, und wenn Sie Ihren 
COMMODORE-64 erst besser kennen, werden Sie sehen, daß die Aus- 
wahl der Software und der peripheren Geräte nur durch die eigene 
Verwirrung bei diesem Überangebot begrenzt ist. Es gibt noch an- 
dere Einheiten für den COMMODORE-64, die wir hier im Rahmen die- 
ses Buches aber keinesfalls aufführen können. 
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Wenn Sie dieses Buch durchgearbeitet haben, sollten Sie Grund- 
kenntnisse besitzen und die Fähigkeiten Ihres Computers verste- 
hen. Ob Sie ihn nur für eine einzelne Funktion benutzen oder nun 
ein Computerfreak sind: jedenfalls ist es erforderlich, daß Sie 
den gesamten Bereich seiner Fähigkeiten verstehen, um Hilfe für 
Ihre Arbeit, Weiterbildung oder Ihre Spiele zu bekommen. Der Com- 
puter ist kein monströses elektronisches Mysterium, sondern ein 
vielseitiges Hilfsinstrument. Sie verstehen vielleicht im Moment 
noch nicht die genaue Arbeitsweise, wissen aber auch wahrschein- 
lich nicht genau, wie der Motor Ihres Autos bis ins kleinste 
Detail funktioniert. Doch hat Sie dies nie davon abgehalten, Ihr 
Auto zu benutzen. Denken Sie bei einem Computer vor allem an eine 
Maschine, die Sie dahin bringt, wohin Sie möchten und sehen 
Sie ihn nicht als Maschine an, der Sie folgen müssen. 
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Anhang A 


C-64 WEDGE 


Die "Test-Demo"-Diskette, die mit dem 1541-Diskettenlaufwerk ge- 
liefert wird, hat ein ausgezeichnetes Disk-Operating-System, das 
Ihnen eine Menge Zeit spart, was die ersten zwei Kapitel angeht. 
Zuerst laden Sie das C-64 WEDGE indem Sie folgendes eingeben: 


LOAD '"C-64 WEDGE" ‚8<RETURN> 
RUN 


Wenn Sie dies gemacht haben, können Sie Ihre Diskette leichter 
handhaben. Sie können sich jetzt auch das Directory ansehen, ohne 
das Programm aus dem Speicher zu löschen. Das Folgende ist eine 
Zusammenstellung der C-64 WEDGE Kommandos, angefertigt von der 
COMMODORE USERS GROUP: 


LOAD / 

LOAD & RUN A 

LOAD Adresse % 

SAVE — 
SAVE und zurück <580:A 


A=Programmname 
ERROR DISPLAY 


DIRECTORY >$ or 8$ 
DIRECTORY für 2 Laufwerke SSLw 

Lw=Laufwerknummer 
DIRECTORY für Bereich 85:A 


A=alphanumerisches Zeichen 
DIRECTORY für Bereich und 2 Lw. 8$Lw:A 


RENAME Datei oder Programm SRO:N=A 

N=Neu A=Alt 
FORMAT Diskette SNO :nm,id 

nm=-Name id=1l1d Nummer 
SCRATCH Datei oder Programm 8S0:Pg Nm | 

Pg Nm=Programmname 
SRATCH Bereich SS0:eB* 


eB=erster Buchstabe 
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Das SCRATCH-Bereich-Kommando löscht alle Dateien auf der Disket- 
te, wenn Sie den ersten Buchstaben nicht angeben. So sind bei der 
Eingabe von 8S0:*, alle Programme zerstört! 


Copy Datei A nach Datei B SC0O:A=0:N 
A=alter Name N=neuer Name 
Reset SU0 
Diskette initialisieren SI 
Ausschalten von WEDGE Se) 
Einschalten von WEDGE SYS 52224 
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Anhang B 


COMMODORE-64 Kommandoübersicht 


Diese Übersicht wurde in alphabetischer Reihenfolge erfaßt. Die 
Beispiele zeigen Ihnen, wie Sie die Kommandos mit geeigneter Syn- 
tax einsetzen. Wenn ein Kommando auf verschiedene Weise benutzt 
‘werden kann, führen wir mehrere Beispiele auf. Einige Beispiele 
sind im Kommandomodus, andere, mit Angabe der Zeilennummer, im 
Programmodus, und einige gemischt aufgeführt. Ergebnisse wurden 
aufgeführt, um klar zu zeigen, was verschiedene Kommandos in den 
Beispielen erzeugen. Es wurden auch einige spezielle Kommandos, 
die im Text nicht vorkamen aufgeführt, um die Übersicht zu kom- 
plettieren. 


ABS() Ergibt den absoluten Wert einer Zahl oder Varia- 
blen. 
PRINT ABS(-123.45) 
Ergebnis: 123.45 


AND Logischer Operator (in IF/THEN-Abfragen). 
IF AS <> "y" AND AS = "COMMODORE-64" THEN 100 


ASC() Ergibt den ASCII-Wert des ersten Zeichens in einem 
String. 
PRINT ASC("W") oder: 
AS = "COMMODORE-64":PRINT ASC(A$) 


ATN() Ergibt den Arcus Tangens der Zahl oder Variablen 
PRINT ATN(123). 
Ergebnis: 1.56266643 


CHRS ( ) Ergibt das Zeichen, das dem dezimalen Wert ent- 
spricht. 
PRINT CHRS (65) 
Ergebnis: A 


CLOSE Schließt Dateien ab. 
CLOSE#7 
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CLR Alle Variablen werden auf Null gesetzt. 
CLR 

CMD Sendet Ausgaben zu einer eröffneten Datei, die mit 
der entsprechenden Dateinummer definiert wurde. 
OPEN7,4 
CMD7 
LIST 

CONT Fortsetzung eines Programmes nach einer STOP- oder 
END-Anweisung. 
CONT 

cos() Ergibt den Cosinus einer Variablen oder Zahl. 


PRINT COS(123) 
Ergebnis: .887968907 


DATA Zeichenketten oder Zahlenwerte, die mit READ Va- 
riablen zugeordnet werden sollen. 
DATA 2,345 ,HALLO, "GEHEN" 


DEF FN() Vom Benutzer definierbare Funktionen. 
DEF FN K(X) = X*X 
PRINT FN K(4) 
Ergebnis: 16 


DIM Legt Größe eines Bereiches fest. 
DIM AS(100) 


END Beendet ein laufendes Programm. 
END 
EXP() Ergibt e mit der angegebenen Potenz. 


PRINT EXP(5) 
Ergebnis: 7.69478526E+23 


FOR Legt Start und Ende einer Schleife fest. 
FOR I = 1 TO 100 


FRE() Der freie Hauptspeicherplatz wird angezeigt. 
PRINT FRE(0) 


GET Hält die Ausführung eines Programmes an, bis ein 
Zeichen von der Tastatur empfangen wurde. 
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GET# 


GOSUB 


GOTO 


IF/THEN 


INPUT 


INPUT# 


INT() 


LEFTS ( 


LEN 


LIST 


3 


) 


Anhang B: Kommandos 


GET AS$S:IF AS = "" THEN 30 


Liest ein Zeichen von einer eröffneten Datei. 
GET#12,RS(I) 


Springt zu einem Unterprogramm an der angegebenen 
Zeilennummer. 
GOSUB 200 


Verzweigt zur angegebenen Zeilennummer. 
GOTO 200 


Fragt eine logische Bedingung ab. 
IF AS = "Q" THEN END 


Hält die Programmausführung an, bis eine Zeichen- 
kette oder Zahl eingegeben und mit RETURN abge- 
schlossen wurde. 

INPUT "MELDUNG"; VAR 


Liest Daten von einer eröffneten Datei oder Ein- 
heit. 
INPUT#1 ,RS(I) 


Ergibt den ganzzahligen Wert einer Variablen oder 
zahl. 

PRINT INT(123.45) 

Ergebnis: 123 


Trennt den angegebenen linken Teil einer Zeichen- 
kette ab. 

A$ = "GUTEN TAG" 

PRINT LEFTS$S(AS$S,3) 

Ergebnis: GUT 


Ergibt die Länge einer Zeichenkette. 
AS = "WIE LANGE BIN ICH?" 

PRINT LEN(AS$S) 

Ergebnis: 18 


Listet das im Hauptspeicher stehende Programm. 
LIST 
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LOAD 


LOG() 


MIDS( ,‚s,l) 


NEW 


NEW(DISKETTE) 


NEXT 


NOT 


ON 


OPEN 


OR 


Lädt Programm von der angegebenen Einheit. 
LOAD "$",8 (INHALTSVERZEICHNIS VON DISKETTE) 
LOAD "PROGRAMMNAME" ‚1 oder: 

LOAD "PROGRAMMNAME" 


Ergibt den Logarithmus einer angegebenen Variablen 
oder Zahl. 

PRINT LOG(123) 

Ergebnis: 4.81218436 


Trennt den angegebenen Teil aus einer Zeichenket- 
te, beginnend bei der Starposition s in der Länge 
Is 

AS = "WUNDERVOLL" 

PRINT MIDS(AS$S,4,3) 

Ergebnis: DER 


Löscht das im Hauptspeicher befindliche Programm. 
NEW 


Formatiert die Diskette, löscht alle Programme. 
Die Einheit muß vorher eröffnet worden sein. 

(New kann mit N abgekürzt werden.) 

OPEN 15,8,15 

PRINT#15 ,"NEWO :DISKETTE , 22" 


Markiert das Ende einer FOR/NEXT-Schleife. 
FOR I = 1 TO 100 

PRINT "WEITER" 

NEXT I 


Logische Verneinung in einem IF/THEN-Statement. 
IF A NOT B THEN GOTO 100 


Für errechnete Sprünge in einem Programm. 
ON A GOSUB 1000,2000,3000 


Eröffnet Datei oder Einheit für die Bearbeitung. 
OPEN] ,1,1 "NAMENSLISTE" 
OPEN7,4 (DRUCKER) 


Logisches ODER in einer IF/THEN-Abfrage. 
IF A = 10 OR B = 20 THEN GOTO 100 
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PEEK 


POKE 


POS() 


PRINT 


PRINT# 


READ 


REM 


RESTORE 


RETURN 
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Liest den Hauptspeicherinhalt an der angegebenen 
dezimalen Adresse. 

PRINT PEEK(768) 

IF PEEK(768) = 5 THEN GOTO 200 


Speichert einen Wert an der angegebenen Speicher- 
adresse. 

POKE 768,10 

Legt den Wert 10 an der Adresse 768 ab. 


Ergibt die augenblickliche Spaltenposition des 
Cursors. 

PRINT "DIESE ZEILE"; :PRINT POS(0) 

Ergebnis: DIESE ZEILE 12 


Gibt Zeichenketten oder Zahlenwerte auf dem Bild- 
schirm oder Drucker aus. (Abk.: ?) 
PRINT 1;2;3; "GO"; FS;A;N% 


Sendet Ausgaben zu einer eröffneten Datei oder 
Einheit. 

PRINT#1 ,NAS(I) oder: 

OPEN7,4 "HALLO COMMODORE-64" 


Ordnet Datan einer DATA-Anweisung Variablen zu. 
READ A:READ BS 
DARA 5 ,"BAD" 


Bemerkungszeile. 
REM DIES IST EINE BEMERKUNG 


Setzt Zeiger für die READ-Anweisung auf das erste 
Element der angegebenen Zeile. 

FOR I = 1 TO 5:READ A$(I):NEXT 

RESTORE 


Rücksprung aus einem Unterprogramm, in das mit 


GOSUB verzweigt wurde. 
RETURN 
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RIGHTS ( 


RND( ) 


RUN 


SAVE 


SIN() 


SPC() 


SOR() 


STOP 


STRS() 


SYS 


’ 


) 


Trennt den spezifizierten rechten Teil aus einer 
Zeichenkette. 

AS = "MARKT UND TECHNIK":PRINT RIGHT$(A$,11) 
Ergebnis: 

TECHNIK 


Ergibt eine Zufallszahl zwischen O0 und 1. 
PRINT RND(5) 

INT(RND(1)*(N)+1) 

ZUFALLSZAHLEN ZWISCHEN 1 UND N 


Startet das im Hauptspeicher befindliche Programm. 
RUN 


Speichert ein Programm auf Diskette oder Band. 
SAVE "GRAPHIK" (BAND) 

SAVE "GRAPHIK",1,1 (BAND MIT BANDENDESPEICHER) 
SAVE "GRAPHIK",8 (DISKETTE) 


Ergibt den Sinus einer Variablen oder Zahl. 
PRINT SIN(123) 

Ergebnis: 

-.459903491 


Druckt die angegebene Anzahl Leerstellen. 
PRINT SPC(29) "HERE" 


Ergibt die Quadratwurzel einer Variablen/Zahl. 
PRINT SQR(64) 


Hält die Ausführung eines Programmes vorübergehend 
an. Das Programm kann mit CONT wieder gestartet 
werden. 

STOP 


Wandelt eine Zahl in eine Zeichenkette um. 
T = 123: T$S = STRS(T): TTS = "$" + TS + ".00" 


Ruft ein Assembler-Unterprogramm auf, das an der 
angegebenen Hauptspeicheradresse steht. 

SYS 58692 (BILDSCHIRM LÖSCHEN UND CURSOR OBEN) 

FOR I = 1 TO 20:5SYS59626:NEXT 

(ROLLT BILDSCHIRM 20 ZEILEN AUFWÄRTS) 
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TAB() 


TAN() 


VAL() 
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Setzt einen horizontalen Tabulator in einer PRINT- 
Anweisung. 
PRINT TAB(20) ; "HIER" 


Ergibt den Tangens einer Variablen/Zahl. 
T = 43:V = 55 
R = T + V:PRINT TAN(R) 


Wandelt Zeichenkette in einen numerischen Wert um. 
HS = "123" :PRINT VAL(HS) 
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Zeichencodes 


Anhang C 


SET 2 POKE | SET1 SET2 POKE | SETI SET2 POKE 


set 1 


57 


59 


31 


61 





nn; 


62 


2323285838 


ya 
m 


72 


<xovo o wu 69 ZT 


> x. 2 2 0.2. 9c 0 


- DS BD DDO OST UIZNLORLB 


28 


nm 
y) 


% 


8 STH 


10 
11 
12 
13 
14 
15 
16 
17 


18 
19 


$ 


© 
ST 


21 


2 


y 
un 


N 
170) 


24 


28 


N 
79) 


27 
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D r »a|ıM ss | 102 
ld vu s|'D oo | [JF 103 
X v sı UL 100 | 104 
C) Ww 87 4 u 117 
#1 x e|/qn 8 118 
I v e|/ TB 2] 119 
 z a/lYy r 120 
us IM un 121 
a ®2| Hl Ü 122 
[D) 3| [I] in 123 
MB [d [® 124 
N NS | P} 125 
“| E JE 
1 | H Fi 127 
98| |] 
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Index 


Abspeichern 
Arrow- und Pi-Taste 
ASCII-Code 


Bedingungen 
AND/OR/NOT 
IF/THEN 
Vergleichsoperatoren 
Stringvergleiche 
Bildschirm rollen 
Byte 


CHRS 
CLR/HOME-Taste 
COMMODORE-Taste 
Control-Taste 
CP/M 
Cursortaste 


DATA 
Dateiverarbeitung 

Band 

CLOSE 

Diskette 

INPUT# 

OPEN 

PRINT# 

sequentielle 
Datenbanken 
Datenrekorder 
Diskettenlaufwerk 
Drucker 

CHRS 

CMD 

CLOSE 

ESCAPE Sequenzen 

Grafikausgabe 

frei def. Grafikzeichen 

Korrespondensdrucker 

Matrixdrucker 

OPEN 
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45 
33 
143, ff. 


95 
98 
95 
95 
106 
137,138 
16 


143, f£. 
32 

31 
31,32 
23,244 
32 


77 

197, f£. 
197, f£. 
198, ££. 
207, ff. 
199, ££. 
199, ££f. 
199, ££. 
207, ff. 
255 

17 

18 
20,21,217, ££. 
222 
219 
221 

223 
230 

231, EX, 
21 

20 

219 


Index 


Index 


PRINT# 
Textausgaben 
Thermodrucker 


Editor 
Erweiterungen 


FOR/NEXT 
Geschachtelte Schleifen 
Schleifenzähler 
Schrittweite 
Funktionstasten 


Geschachtelte Schleifen 
GET 
Grafik 
Bildschirmgrafik 
bewegte 
farbige 
Spritegrafik 
bewegte 
entwerfen 
farbige 


Hardware 
HOME 


INPUT 
INST/DEL 


Klammern 
Kommandomodus 
Korrespondenzdrucker 


LIST 


Mathematische Operationen 
Matrixdrucker 

Modem 

Monitor 


PEEK 
POKE 
PRINT 


220,221 


219 
21 


49, 
23 


80 
82 
86 
83, 
34 


82 
76 


164, 
172, 
167, 
181, 
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ff: 


ff. 


ff. 
Tf. 
ff. 
ff. 
ff. 
ff. 
ff. 


Programme laden 
Programmiersprachen 

ASSEMBLER 

FORTH 

PASCAL 
Programmodus 


RAM 
RESTORE-Taste 
RETURN-Taste 
ROM 
RUN/STOP-Taste 


SAVE 
Sichern 
Software 
Sortieren 
BUBBLE SORT 
QUICKSORT 
SHELLSORT 
SPC 
Stringverarbeitung 
Aufteilung 
LEFTS 
MIDS 
RIGHTS 
Berechnungen 
formatieren 
Umwandeln 
Text in Zahlen 
Zahlen in Text 
Verketten 
SYS 
Systemcheck 


TAB 
Tabellen 
DIM 
mehrdimensionale 
Tastatur 
Funktionstasten 
Tricks 
waAIT 
Tastaturgrafik 


275 


28 


242 
243 
243 

40 


15 
32 
33 
17 
32 


45 

47 

15 
245, ff. 
246 
248,249 
247 

118 

120 

123 

123, ff. 
123, f£f. 
123, ff. 
121 

121 

127 

127 
128,129 
130, ££. 
154, £f. 


251 

249,250 

250 
33,34 


Index 


Index 


Textverarbeitung 

Thermodrucker 

Tongenerator 
ATTACH/DECAY 
SUSTAIN/RELEASE 


Überspielen von Band auf Diskette 
Unterprogramme in Maschinensprache 
Unterprogrammtechnik 

Gliederung 

GOSUB - RETURN 


Variablen 
Variablennamen 
Variablentypen 
einfache Genauigkeit 
Integer 
String 


Verzweigen 
Errechnetes GOTO und GOSUB 
GOTO 


2-80 

Zahlensysteme 
dezimal 
hexadezimal 

Zeilen löschen 
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252, ff. 
21 

155, ££f. 
156 

156 


29 
154 
101 
102 
101 


63 
65 
67 
67 
68 
69 


92 
103, ££. 
92, f£. 
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149 
149 
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COMMODORE 16/116 


W. Besenthal/). Muus 


Alles über den C 16 
Juli 1986, 292 Seiten 


Dieses Buch ist ein Lern- und Nachschlagewerk für jeden 
Commodore-Anwender. Es ist übersichtlich gegliedert und 
enthält alle Informationen, die für die praktische Arbeit am 
Computer notwendig sind: BASIC-Kurs mit Beispielen, 
Strukturiertes Programmieren, Dateiverwaltung, Grafikpro- 
grammierung, Tips & Tricks. 

DM 39,- 





Best.-Nr. MT 90385, ISBN 3-89090-385-1 
(sFr. 35,90/6S 304,20) 


COMMODORE 64 


F. Ende 


Das große Spielebuch - Commodore 64 
1984, 141 Seiten 


46 Spielprogramme - Wissenswertes über Programmier- 


technik - praxisnahe Hinweise zur Grafikherstellung - alles 

über Joystick- und Paddleansteuerung : das Spielebuch mit 

Lerneffekt. 

Best.-Nr. MT 603, ISBN 3-922120-63-6 

(sFr. 27,50/6S 232,40) DM 29,80 

Best.-Nr. MT 604 (Beispiele auf Diskette) 

(sFr. 38,-16S 342,-) DM 38,- 
* inkl. MwSt. Unverbindliche Preisempfehlung. 


S.Krute 


Grafik & Musik auf dem Commodore 64 
1984, 336 Seiten 


68 gut strukturierte und kommentierte Beispielprogramme 
zur Erzeugung von Sprites und Klangeffekten - Sprite-Tricks 
- Zeichengrafik - hochauflösende Grafik : Musik nach 
Noten - spezielle Klangeffekte - Ton und Grafik - für fortge- 
schrittene Anfänger, die alle Möglichkeiten des C64 ausnut- 
zen wollen. 

Best.-Nr. MT 743, ISBN 3-89090-033-X 

(sFr. 35,-1öS 296,40) DM 38,- 


H. L. Schneider/W. Eberl 


Das C 64-Profihandbuch 

1985, 413 Seiten 

Ein Buch, das alle wichtigen Informationen für professio- 
nelle Anwendungen mit dem C64 enthält. Mit allgemeinen 
Algorithmen, die auch auf andere Rechner übertragbar sind, 
und vielen Utilities, getrennt nach BASIC- und Maschinen- 
programmen. Besonders nützlich: erweiterte PEEK- und 


POKE-Funktionen. 
Best.-Nr. MT 749, ISBN 3-89090-110-7 
DM 52,- 


(sFr. 47,801ö6S 405,60) 


W.-J. Becker/M. Folprecht 


Programmieren unter GP/M mit dem C 64 
1985, 290 Seiten 


Wenn Sie wissen wollen, wie das Betriebssystem CP/M-2.2 
auf dem C64 implementiert ist, außerdem einiges über 


Turbo-Pascal, Nevada-Fortran, MBASIC-80 erfahren wollen, 
dann ist dieses Buch genau richtig für Sie! Mit Schaltplänen 
zur eigenen Fertigung des CP/M-Moduls. Für eingefleischte 
C64-Profis. 

Best.-Nr. MT 751, ISBN 3-89090-091-7 

(sFr. 47,80/65 405,60) DM 52,- 


J. Mihalik 


35 ausgesuchte Spiele für Ihren Commodore 64 
1984, 141 Seiten 


Programmieren Sie selbst 35 faszinierende Spiele 
geschrieben in Commodore-64-BASIC - mit Farbe, Grafiken 
und Ton - Vorschläge zur Programmabwandlung - für krea- 
tire Computerfans, die ihre Programmierkenntnisse vertie- 
fen wollen! 

Best.-Nr. MT 774, ISBN 3-89090-064-X 

(sFr. 23,-16S 193,40) DM 24,80 


W. Kassera/F. Kassera 


C64 - Programmieren in Maschinensprache 
1985, 327 Seiten inklusive Beispieldiskette 


In diesem Buch finden Sie über 100 Beispiele zur Assem- 
bler-Programmierung mit viel Kommentar und Hintergrund- 
informationen: Das Schreiben von Maschinenprogrammen : 
Rechnen und Texten mit vorhandenen Routinen - Bedie- 
nung von Drucker und Floppy : Wie man BASIC- und 
Maschinenprogramme verknüpft : Erstellen von eigenen 
Befehlen in Modulform. Für Profis! 
Best.-Nr. MT 830, ISBN 3-89090-168-9 

(sFr. 47,8016S 405,60) DM 52,- 


P. W. Dennis/G. Minter 


Spiele für den Commodore 64 
1984, 196 Seiten 


Bewährte alte und raffinierte neue Spiele für Ihren Com- 
modore64 - klar und übersichtlich gegliederte Programme 
im Commodore-BASIC - Sie lernen: wie man Unterpro- 


gramme einsetzt : eine Tabelle aufbauen und verarbeiten - 

Programme testen - mit vielen Programmiertricks ° für 

Anfänger. 

Best.-Nr. MT 90074, ISBN 3-89090-074-7 

(sFr. 23,-16S 193,40) DM 24,80 

Best.-Nr. MT 795 (Beispiele auf Diskette) 

(sFr. 38,-1öS 342,-) DM 38, 
* inkl. MwSt. Unverbindliche Preisempfehlung. 


K. Schramm 


Die Floppy 1541 
1985, 434 Seiten 


Für alle Programmierer, die mehr über ihre VC-154 1-Floppy- 
station erfahren wollen. Der Vorgang des Formatierens - das 
Schreiben von Files auf Diskette - die Funktionsweise von 
schnellen Kopier- und Ladeprogrammen - viele fertige Pro- 
gramme - Lesen und Beschreiben von defekten Disketten - 
Für Einsteiger und für fortgeschrittene Maschinensprache- 
Programmierer. 

Best.-Nr. MT 90098, ISBN 3-89090-098-4 


(sFr. 45,10/6S 382,20) DM 49,- 
Best.-Nr. MT 710 (Beispiele auf Diskette) 
(sFr. 29,90/6S 269,10) DM 29,90* 


* inkl. MwSt. Unverbindliche Preisempfehlung. 
Die angegebenen Preise sind Ladenpreise 


Sie erhalten Markt & Technik-Bücher bei Ihrem Buchhändler 


Markt & Technik Verlag AG Unternenmensbereich Buchverlag, Hans-Pinsel-Straße 2, 8013 Haar bei München 
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S. Baloui 
C 64-Fischertechnik: 


Messen, Steuern, Regeln 
Februar 1986, 174 Seiten 


Ziel dieses Buches ist es, jedem Besitzer eines Commodore 
64/VC 20 eine neue Welt zuerschließen: Die Welt der Robo- 
ter, dercomputergesteuerten Fertigungsstraßen. Alles, was 
Sie benötigen, ist einer der beiden genannten Computer 
und der Fischertechnik-Computing-Baukasten mit dazuge- 
hörigem Interface. 

Best.-Nr. MT 90194, ISBN 3-89090-194-8 

(sFr. 27,6016S 233,20) DM 29,90 


F. Matthes 


Pascal mit dem C 64 
Juni 1986, 
215 Seiten inklusive Diskette 


Buch und Compiler ermöglichen jedem Besitzer eines C64 
den Einstieg in die moderne Programmiersprache Pascal. 
Dem Anfänger wird ein Einführungskurs in Pascal geboten, 
wobei viele überschaubare Beispiele aus der Praxis und 
Ubungsaufgaben zum aktiven Lernen mit dem C 64 auffor- 
dern. 

Für den Pascal-Profi gibt es neben nützlichen Beispielpro- 
grammen ein spezielles Kapitel mit Tips und Tricks. 

Der Compiler akzeptiert den gesamten Sprachumfang mit 
einigen Erweiterungen. Übersetzte Programme laufen ohne 
weitere Hilfsprogramme auf jedem C 64, nutzen den gesam- 
ten Programmspeicher des C 64 und sind 3-4mal schneller 
als vergleichbare Programme in BASIC. 

e Dem Buch liegt ein leistungsfähiges PASCAL-SYSTEM 
mit einigen Pascal-Programmen auf Diskette bei. 

Best.-Nr. MT 90222, ISBN 3-89090-222-7 

(sFr. 47,8016S 405,60) DM 52,- 


M. Hegenbarth/R. Trierscheid 


BASIC-Grundkurs mit dem C 64 
1985, 377 Seiten 


Der Computerneuling kann mit diesem Buch lernen, mit sei- 
nem C 64 in BASIC zu arbeiten, und wird auf die Besonder- 
heiten seines Computers hingewiesen. Dabei müssen nicht 
unendlich viele und umfangreiche Beispielprogramme müh- 
sam abgetippt werden; es ist sogar denkbar, die Kapitel erst 
durchzulesen und das Gelernte dann am Computer auszu- 
probieren. Erwähnenswert ist auch ein Kapitel, welches die 
Kommunikation zweier C64 beschreibt, und der Anhang, in 
dem neben der Kurzbeschreibung der reservierten Worte 
des BASIC V2 (mit Beispielen) eine Liste nützlicher PEEKs, 
POKEs und SYS und noch vieles mehr enthalten ist. 
Best.-Nr. MT 90361, ISBN 3-89090-361-4 

(sFr. 40,50/65 343,20) DM 44.- 


H. Ponnath 


C64: Wunderland der Grafik 
1985, 232 Seiten inklusive Beispielidiskette 


Dieses Buch zeigt eine Vielzahl sehr interessanter Lösun- 
gen, um die grafischen Möglichkeiten des Commodore 64 
optimal zu nutzen. Als Krönung enthält es ein zuschaltbares 
Assemblerprogramm, das umfangreiche grafische und 
einige neue BASIC-Befehle anbietet. Im zweiten Teil des 


Sie erhalten Markt & Technik-Bücher bei Ihrem Buchhändler 


Markt & Technik Verlag AG Unternehmensbereich Buchverlag, Hans-Pinsel-Straße 2, 8013 Haar bei München 


Buches wird eine Möglichkeit gezeigt, wie man bis zu 70 
verschiedene Farben erzeugen kann. Viele Beispielpro- 
gramme begleiten die Reise durch das Wunderland der 
Grafik. 

Best.-Nr. MT 90363, ISBN 3-89090-363-0 

(sFr. 45,10/6S 382,20) DM 49,- 


Commodore Sachbuch 


Alles über den C64 
Juli 1986, 514 Seiten 


Das umfangreiche Grundlagenbuch für den Commo- 
dore64, ein nützliches Werkzeug, damit das künftige Pro- 
grammieren auch Spaß macht: BASIC-Lexikon mit allen 
Befehlen, Anweisungen und Funktionen in alphabetischer 
Reihenfolge - Programmierung in Maschinensprache und 
Einbindung von Maschinensprache-Routinen in BASIC- 
Programme - Bestandteil des Betriebssystems: Das Kernal 
- Ein- und Ausgabeprogrammierung von SPRITES und Son- 
derzeichen - Erzeugung von Laufbildern in hochauflösen- 
der Farbgrafik - Musiksynthese und Klangeffekte - 
Betriebssystem CP/M sowie weitere anspruchsvolle Spra- 
chen - GEOS. 

Best.-Nr. MT 90379, ISBN 3-89090-379-7 

(sFr. 54,30/6S 460,20) DM 59,- 


R. West 


C-64/SX-64-Computer-Handbuch 
1985, 688 Seiten 


Das Buch reicht von den professionellen Aspekten der 
BASIC-Programmierung (Entwicklung klarer und strukturier- 
ter Problemlösungen und/oder effizienter Programme) über 
sehr systemnahe Informationen (Änderungen am eingebau- 
ten BASIC, am Betriebssystem etc.) bis hin zur Hardware 
(Schnittstellen, Kassettengeräte, Floppy) und allen Fragen, 
die damit zusammenhängen. Besonders wichtig bei dieser 
Fülle an Informationen: der klare Aufbau des Buches, der 
den schnellen Zugriff auf die benötigte Information garan- 
tiert und so das Buch zur idealen Arbeitsgrundlage macht. 
e Eine Enzyklopädie der Profi-Programmierung auf dem 
C64. 

Best.-Nr. PW 80324, ISBN 3-921803-24-1 

(sFr. 60,70/65 514,80) DM 66,- 


R. Valentine 
C-64-Programmsammlung 


50 Lehr-, Spiel- und Nutzprogramme 
1985, 200 Seiten 


Praxisorientierte Programme und interessante Tips für den 
64-User, der schon Erfahrungen mit seinem Computer 
gesammelt hat und sein Wissen (und auch seine Programm- 
sammlung) erweitern möchte. PEEK, POKE, Bit- und Byte- 
manipulationen werden an ebensoleicht verständlichen Bei- 
spielen erklärt wie die Verwendung der eingebauten Zeituhr 
und der Sound- und Grafikfeatures Ihres C64. Abgerundet 
wird die ganze Sache durch ein kleines Datenverwaltungs- 
programm, einen Pilot-Interpreter (!) und viele Spiele. Sämtli- 
che Programme sind in BASIC geschrieben und gut erklärt 
- somit auch leicht eigenen Anforderungen anzupassen. 
Best.-Nr. PW 80346, ISBN 3-921803-46-2 

(sFr. 27,50/6S 232,40) DM 29,80 


Die angegebenen Preise sind Ladenpreise 





Weitere Fachbücher aus unserem Verlagsprogramm 
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Reparaturanleitung Computer: 
C64 - Technische Servicedaten für Ihren Computer 


Einzigartige Serviceunterlagen für Reparaturen und Ent- 
wicklungsarbeiten am C64. Enthält Schaltpläne, Bauteile- 
und Vergleichstypenliste; Prüfpunkte mit Oszillogrammen 
der Signalformen, Logiktabellen, Spannungsangaben; 
schnelle Servicetests, Anleitung zur systematischen Fehler- 
suche. 

Best.-Nr. PW 80355, ISBN 3-921803-55-1 

(sFr. 27,50/6S 232,40) DM 29,80 


COMMODORE 1281128 D 


G. Jürgensmeier 


WordStar für den Commodore 128 PC 
1985, 435 Seiten 


WordStar ist ein umfangreiches und leistungsfähiges Text- 
verarbeitungsprogramm und damit sicherlich zu Recht das 
meistverkaufte Programm seiner Art. Doch bedeutet dies 
nicht unbedingt, daß es auch einfach zu bedienen ist. Hier 
setzt dieses Buch an: Es macht in vorbildlicher Weise mit 
allen Möglichkeiten von WordStar und MailMerge vertraut 
und ist damit eine ideale Ergänzung zum Handbuch. Es ver- 
sammelt alle wichtigen Informationen für den effektiven Ein- 
satz dieser Programme auf dem Commodore 128PC. 
Best.-Nr. MT 780, ISBN 3-89090-181-6 

(sFr. 45,10/65 382,20) DM 49,- 





Dr. P. Albrecht 


Multiplan für den Commodore 128 PC 
1985, 226 Seiten 


Multiplan wurde ursprünglich für das 16-Bit-Betriebssystem 
MS-DOS entwickelt. Inzwischen ist aber auch die in diesem 
Buch beschriebene CP/M-Version für den Commodore 128 
PC auf dem Markt, die den vollen Leistungsumfang der 
16-Bit-Version enthält. 

Das vorliegende Buch soll eine praktische Einführung in den 
Umgang mit Multiplan auf dem Commodore 128 PC geben. 
Anhand von praxisnahen Beispielen werden alle Befehle 
und Funktionen in der Reihenfolge beschrieben, die der 
Arbeit in der Praxis entspricht. Bereits nach Abschluß des 
ersten Kapitels werden Sie in der Lage sein, eigene kleine 
Multiplan-Anwendungen zu realisieren. 
Best.-Nr. MT 836, ISBN 3-89090-187-5 

(sFr. 45,10168 382,20) DM 49 - 


Dr. P. Albrecht 


dBASE II für den Commodore 128 PC 
1985, 280 Seiten 


Das vorliegende Buch gibt nach einer kurzen Einführung in 
den Komplex »Datenbanken« eine Anleitung für den prakti- 
schen Umgang mit dBASE Il. Schon nach Beherrschung 
weniger Befehle ist der Anwender in der Lage, Dateien zu 
erstellen, mit Informationen zu laden und auszuwerten. 
Dabei hilft ihm ein integrierter Reportgenerator, der im Dia- 
log mit dem Benutzer Berichte gestaltet und in Tabellenform 
ausdruckt. 

Best.-Nr. MT 838, ISBN 3-89090-189-1 

(sFr. 45,10/6S 382,20) DM 49,- 


H. Haber!l 


Mini-CAD mit Hi-Eddi plus auf dem C 64/C 128 
1985, 230 Seiten inklusive Diskette 


Neben den »Standardbefehlen« zum Setzen und Löschen 
von Punkten, dem Zeichnen von Linien, Kreisen und Recht- 
ecken sowie dem Ausfüllen unregelmäßiger Flächen und 
dem Verschieben und Duplizieren von Bildschirmbereichen 
bietet Hi-Eddi eine Reihe von Besonderheiten, die dieses 
Programm von anderen Grafikprogrammen abheben: Bis zu 
sieben Grafikbildschirme stehen gleichzeitig zur Verfügung; 
es besteht die Möglichkeit, Text in die Grafik einzufügen, die 
Bildschirme zu verknüpfen oder in schneller Folge durchzu- 
schalten. 

Best.-Nr. MT 90136, ISBN 3-89090-136-0 

(SFr. 44,20/6S 374,40) DM 48,- 


J. Hückstädt 


BASIC 7.0 auf dem Commodore 128 
1985, 239 Seiten 


Ganz gleich, ob Sie bereits über Programmierkenntnisse 
verfügen oder nicht, dieses Buch wird Ihnen helfen, den 
größtmöglichen Nutzen aus dem leistungsstarken BASIC 
7.0 des Commodore 128PC zu ziehen. Sie eignen sich bei 
der Durcharbeitung dieses Buches alle notwendigen Kennt- 
nisse an, um immer anspruchsvollere Aufgabenstellungen 
zu bewältigen: Listenverarbeitung, indexsequentielle Datei- 
verwaltung, Grafikdarstellungen und Sounderzeugung. Ein 
unentbehrliches Lehrbuch, das sich auch für den geübten 
Anwender als Nachschlagewerk eignet. 
Best.-Nr. MT 90149, ISBN 3-89090-149-2 

(sFr. 47,80/6S 405,60) DM 52,- 


K. Schramm 


Die Floppy 1570/1571 
Juni 1986, 470 Seiten 


Dieses Buch soll es sowohl dem Einsteiger als auch dem 
fortgeschrittenen Programmierer ermöglichen, die vielfälti- 
gen Möglichkeiten dieses neuen Gerätes voll auszuschöp- 
fen. Sämtliche Betriebsarten und Diskettenformate werden 
ausführlich erläutert. Anhand vieler Beispiele werden Sie in 
die Dateiverwaltung mit dieser Floppy eingeführt. Der 
Benutzer lernt die zahlreichen Systembefehle kennen und 
erfährt zugleich wichtige Grundlagen für das Arbeiten mit 
dem Betriebssystem CP/M. 

Best.-Nr. MT 90185, ISBN 3-89090-185-9 

(sFr. 47,80/65 405,60) DM 52,- 


P. Rosenbeck 


Das Commodore-128-Handbuch 
1985, 383 Seiten 


In diesem Buch finden Sie einen Querschnitt durch alle 
wichtigen Funktions- und Anwendungsbereiche des Com- 
modore 128. Sie werden mit dem C 64/C 128-Modus und 
der Benutzung von CP/M-3.O vertraut gemacht, erfahren 
alles über die Grafik- und Soundmöglichkeiten des C 128, 
lernen die Techniken der Speicherverwaltung und das Ban- 
king kennen und werden in die Programmierung mit Assem- 
blersprache sowie die Grafikprogrammierung des 80-Zei- 
chen-Bildschirms eingeführt. Ein umfassendes Handbuch, 
das Sie immer griffbereit haben sollten! 
Best.-Nr. MT 90195, ISBN 3-89090-195-6 

(sFr. 47,80/6S 405,60) DM 52,- 


Die angegebenen Preise sind Ladenpreise 


Sie erhalten Markt & Technik-Bücher bei Ihrem Buchhändler 


Markt & Technik Verlag AG Unternehmensbereich Buchverlag, Hans-Pinsel-Straße 2, 8013 Haar bei München 
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Weitere Fachbücher aus 


Prof. Dr. Wolf-Jürgen Becker j 


CP/M-3.0-Anwender-Handbuch C 128 
Mai 1986, 250 Seiten 


Das Buch sagt Ihnen alles über den Aufbau einer Datenver- 
arbeitungsanlage, Mikrocomputer, Programmiersprachen 
und Betriebssysteme im allgemeinen und über das Betriebs- 
system CP/M speziell auf dem C128 PC. Ausführliche 
Beschreibungen der CP/M-Befehle und ihrer Funktionen 
fehlen ebensowenig wie die umfassende Darstellung der 
Struktur von CP/M-3.0 auf dem C 128. Im Kapitel über das 
Programmieren unter CP/M erfahren Sie dann, wie man das 
CP/M-Betriebssystem ändert, kommerzielle Software instal- 
liert und mit ihr arbeitet. 

Best.-Nr. MT 90196, ISBN 3-89090-196-4 

(sFr. 47,80/6S 405,60) DM 52,- 


H.Ponnath 


Grafik-Programmierung C 128 
März 1986, 196 Seiten 


Eine Hilfe für den Einsteiger und eine Fundgrube von Anre- 
gungen für den Profi soll dieses Buch sein. Das Themenfeld 
ist weit gespannt und umfaßt unter anderem: 
Mehrfarbengrafik im C 128-Modus; die Programmierung 
von Sprites und Shapes; Assembler-Makros, die die Grafik- 
programmierung unterstützen; die beiden Video-Chips des 
C128; Erzeugung selbstmodifizierender Programme; 
Generierung von Fractals, ein besonders spannendes 
Thema im Bereich mathematischer Grafikanwendungen. 
Die ungewöhnlichen Grafikfähigkeiten des C 128 werden 
voll ausgeschöpft. 

Best.-Nr. MT 90202, ISBN 3-89090-202-2 

(sFr. 47,80/6S 405,60) DM 52,- 


G. Möllmann 


6 128-Programmieren in Maschinensprache 
August 1986, ca.250 Seiten 


Dieses Buch ist für alle diejenigen geschrieben, die die 
Fähigkeiten ihres Commodore 128 vollausschöpfen wollen, 
um selbst erfolgreich auf dem Commodore 128 program- 
mieren zu können. Dazu gehört außer der Beschreibung der 
im 128er enthaltenen Bausteingruppen auch der Umgang 
mit den ROM-Routinen aus Basic und Betriebssystem. 

e Eine Fundgrube für jeden ernsthaften C 128-Pro- 
grammierer! 

Best.-Nr. MT 90213, ISBN 3-89090-213-8 

(sFr. 47,8016S 405,60) DM 52,- 


R. Schineis/M. Braun 


C128-ROM-Listing: BASIC-7.0-Betriebssystem 
August 1986, ca.300 Seiten 


Nach einer Einführung in die Arbeitsweise des C 128 wer- 
den der interne Aufbau und die Wirkungsweise des BASIC- 
Interpreters erläutert. Es wird hierbei unter anderem auf die 
Speicher- und Variablen-Organisation sowie auf die Struktur 
und Ablage von BASIC-Zeilen eingegangen. Vor dem Haupt- 
teil, einem vollständig kommentierten Assemblerlisting des 
C-128-BASIC-Interpreters mit Cross-Referenzliste (Ver- 
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weistabelle), werden Informationen über die Struktur und 
Interpretation des Listings und der Verweistabelle gegeben. 
Best.-Nr. MT 90220, ISBN 3-89090-220-0 

(sFr. 45,10165 382,20) DM 49,- 


R. Schineis/M. Braun/N. Demgensky 
C128-ROM-Listing: Operating System 
März 1986, 450 Seiten 


Dieses Buch ist für alle Programmierer und Anwender 
gedacht, die mehr über ihren Commodore 128 PC wissen 
wollen: Eine Einführung in die Organisation und Wirkungs- 
weise eines Mikrocomputers sowie eine detaillierte 
Beschreibung der Mikroprozessorfamilie 65XX bzw. 8502, 
Aufbau und spezielle Hardwareeigenschaften desC 128 mit 
Beispielprogrammen. Ein umfangreiches, vollständig kom- 
mentiertes Assemblerlisting mit Cross-Referenzliste 
(Verweistabelle) umfaßt das komplette Betriebssystem mit 
dem 40/80-Zeichen-Editor sowie allen Kernel-Routinen. 
Best.-Nr. MT 90221, ISBN 3-89090-221-9 

(sFr. 45,10/6S 382,20) DM 49,- 


COMMODORE AMIGA 





M. Breuer 


Das AMIGA-Handbuch 
März 1986, 461 Seiten 


Das Buch liefert übersichtlich gegliedertes Grundwissen 
über die neue Commodore-Maschine. Aus dem Inhalt: 
Vorhang auf: Der AMIGA! - Auf der Werkbank des AMIGA 
Grundlage der Bedienung des AMIGA - Grafik mit Graficraft 
und Delux Paint. AMIGA für Fortgeschrittene: Das CLI - 
Automatisierung des AMIGA - Die Spezialchips des AMIGA 
- Grundlagen von Sound und Grafik. 

© Mit vielen Abbildungen und Übersichtstafeln für den tägli- 
chen Einsatz. 

Best.-Nr. MT 90228, ISBN 3-89090-228-6 

(sFr. 45,1016S 382,20) DM 49,- 


COMMODORE PC 10IPC 20 





D. A. Lien 


BASIC-Programmierung PC 10/PC 20 
1985, 488 Seiten 


Ein amerikanisch-lockerer BASIC-Kurs von dem kaliforni- 
schen Professor Lien. Durch seine Systematik ideal als 
Kursunterlage für PC 10/20 und Kompatible. Mit Einführung 
in das PC-10-System und Tastendarstellung im Text. 
Best.-Nr. PW 80366, ISBN 3-921803-66-7 

(sFr. 54,30/6S 460,20) DM 59,- 


Die angegebenen Preise sind Ladenpreise 


Sie erhalten Markt & Technik-Bücher bei Ihrem Buchhändler 


Markt & Technik Verlag AG Unternehmensbereich Buchverlag, Hans-Pinsel-Straße 2, 8013 Haar bei München 





Einführungskurs: 
COMMODORE 64 


Dieses Buch soll Ihnen helfen, 
sich mit Ihrem Commodore 64 
rundum vertraut zu machen. In 
den ersten Kapiteln werden 
Grundkenntnisse über die 
Hardware vermittelt, damit Sie 
Ihren Computer ordnungsge- 
mäß aufstellen, anschließen 
und bedienen können. Dabei 
werden auch Diskettenlauf- 
werke, Drucker und Kassetten- 
geräte in Ihrer Funktion be- 
schrieben. 

Als Fortgeschrittener können 
Sie direkt zu den Kapiteln 
übergehen, die sich mit der 
Programmiersprache BASIC 


beschäftigen. Deshalb werden 
am Anfang der einzelnen Lern- 
Orientierungshil- 


abschnitte 





Markt&dechnik 





fen gegeben, die den Inhalt 
kurz beschreiben. Zusätzlich 
wird der gesamte Stoff am En- 
de jedes Kapitels in Form ei- 
ner Zusammenfassung wie- 
dergegeben. 

Der ausführliche BASIC-Teil 
umfaßt die gesamten Einsatz- 
gebiete des Commodore-64- 
BASIC wie 

® Grafik 

® Musik 

® Dateiverwaltung 

mit vielen Beispielen, Pro- 
grammen, Tabellen und wich- 
tigen Hinweisen, die mit der 
jeweils ausführlich bespro- 
chenen BASIC-Anweisung ge- 
koppelt sind. 

Das Buch unterstützt durch 


ISBN 3-89090-017-8 


seinen Aufbau das direkte Ar- 
beiten am Computer, weist 
auf häufige Fehler und deren 
Beseitigung oder Vermeidung 
hin. 

Im abschließenden Teil wer- 
den Hardware-Erweiterungen 
und weitere Programmierspra- 
chen mit deren Einsatzmög- 
lichkeiten für den Commodore 
64 vorgestellt. 

Drei wichtige Sortierroutinen, 
häufig benötigte Tabellen, so- 
wie eine Zusammenstellung 
der BASIC-Anweisungen, -Be- 
fehle und -Funktionen verhel- 
fen Ihnen zu einem schnellen 
Überblick und erleichtern das 
Programmieren mit dem Com- 
modore 64. 


DM 38,- 


sFr. 35,- 
6S 296,40 





fhis was brought to you 
from the archives of 


http://retro-commodore.eu 


